X LuigiB Lente capricciosa

[LuigiB]

eh come .. semplicemete agendo sul ciclo che fa la ricerca dei numeri
attualmente nel mio script il ciclo fa cosi (faccio l'esempio con le distanze ma è ugale anche nelle altre ricerche)

	For k = 1 To UBound(aCelle)
	[COLOR="#FF0000"]	For kk = 3 To nColonne - 1
			If Distanza(aCelle(k,kk),aCelle(k,kk + 1)) = nDistanzaVoluta Then
				aColoriCelle(k,kk) = nColore
				aColoriCelle(k,kk + 1) = nColore
			End If
		Next[/COLOR]
		Call AvanzamentoElab(1,UBound(aCelle),k)

	Next

come vedi cicla da 3 a nColonne-1 considerando un 'unica sequenza fatta di 55 numeri ...
tu è proprio questo che non vuoi percio invece di fare questo ciclo che fila diretto da 3 a nColonne-1
devi fare in modo di fare dei subcicli fatti di 5 posizioni ciascuno è su quelle che devi fare i confronti
per cercare la situazione sulla singola ruota
Come fare ?
cancellare completamente il ciclo fatto da me
introdurre due variabili chiamale come ti pare facciamo nA , nB
inserire un ciclo R sulle ruote da 1 a 11
calcolare i limiti per la ruota R valorizzando nA e nB con la prima e l'ultima colonna appartenente alla ruota in questione la R
inserire un ciclo kK da nA a nB-1 per ciclare sugli estratti della ruota in esame
fare i confronti usando il valore contenuto in Kk per identificare la colonna col numero
e impostare i colori per le celle individuate
chiudere il ciclo Kk
chiudere il ciclo R


benissimo ti ho scritto la ricetta credo nella giusta sequenza .. vediamo come te la cavi ad implementarla
ricordati che i moschettieri devono sempre tenere alto l'onore

 

[Lanfranco60]

Grazie Luigi, mi hai dato materiale per il dopo cena.....

 

[Lanfranco60]

Niente, mi sono arenato, ero riuscito a farlo funzionare su una ruota (Ba), ma poi sono riuscito solo a bloccare addirittura l'editor

ci riprovo domani, non demordo

 

[LuigiB]

se non ci riesci vai a vedere lo script alla pagina precedente , l'ho modificato gia ieri ..

 

[Lanfranco60]

Azz !!!

Me ne sono accorto solo adesso che non sono un MOSchettiere ma solo un MOS........ :-(

Credimi mi ci sono quasi esaurito sopra.

Grazie

 

[Joe91]

Buon Giorno a tutte/i.

In buona tradizione ... è praticamente impossibile utilizzare sto Forum.

Non aggiungo altro per non esssere triviale.

Provo ad unire una mia soluzione al quesito originale (questa volta, con la separazione delle ruote).

Cordiali saluti.

 

[Lanfranco60]

Buon Giorno a tutte/i.

In buona tradizione ... è praticamente impossibile utilizzare sto Forum.

Non aggiungo altro per non esssere triviale.

Provo ad unire una mia soluzione al quesito originale (questa volta, con la separazione delle ruote).

Cordiali saluti.

Ciao Joe, sembra che il problema forum sia rientrato ( a quanto risulta, attacco hacker fù....) (miiii, sembra siciliano...).

Joe, ho scaricato quel file, ma come si usa, lo devo mettere nei plugin di spaziometria ? o lo posso usare direttamente così?

 

[Joe91]

Ciao dovrebbe essere un programma eseguibile anche a sé stante.

 

[Lanfranco60]

Lo vedo molto in piccolo, ma carino e sopratutto senza fronzoli

Joe, non potresti mettere lo script per favore ?

posso solo imparare......

grazie