excel per "i numeri più ritardatari su più ruote"

[paolox]

Ciao paolox, ciao biancocandido,

propongo questa soluzione:

1) copiare la somma dei ritardi dal range BA90:BA179 al range BE187:BE276
2) nel range BD187:BD276 inserire i numeri da 1 a 90
3) selezionare il range BD187:BE276 ed effettuare un ordine crescente in base alla colonna BE

Questa la macro

Codice: Seleziona tutto

Sub Copia_ordina()
For I = 1 To 90
    Cells(186 + I, 56) = I)
    Cells(186 + I, 57) = Cells(89 + I, 53)
Next I
Range("BD187:BE276").Select
Selection.Sort Key1:=Range("BE187"), Order1:=xlAscending, Header:=xlNo
Range("BE186").Select
End Sub


da associare ad un pulsante.

Dal foglio excel Alt+F11, si apre VBA, Inserisci--->Modulo, nel frame di destra incollare la macro, ritornare sul foglio excel con Alt+F11. Creare in BE186 il pulsante dalla barra Moduli, si apre la finestra Assegna macro, selezionare la macro Copia_ordina, OK e...provare.

Ciao
Tribuno

ho provato ma non mi riesce,
mi esce un messaggio
Errore di compilazione:
Errore di sintassi


allego il file in questione

[Tribuno]

Scusa, hai ragione, ho dimenticato una parentesi nell'istruzione

Codice: Seleziona tutto

Cells(186 + I, 56) = I)

corretta

Codice: Seleziona tutto

Cells(186 + I, 56) = I

Ciao
Tribuno

[paolox]

ok funziona

è la prima volta che inserisco un pulsante
come mai non è perfettamente nella cella BE186?

[paolox]

ho provato a fare altri pulsanti per i 9 numeri,
utilizzando la stessa macro ma sostituendo
a BD il BG ed a BE il BH
mi esce messaggio
rilevato nome non univoco:
copia-ordina
e mi sballa tutti i numeri non mettendoli in ordine ascendente

quale formula devo inserire allora?

[paolox]

ho trovato come sistemare i pulsanti,
tasto destro>formato controllo e da li si sistema tutto,
colori dimensioni, margini ecc.

non riesco ancora però a capire
quale sia la formula esatta da
inserire per il secondo pulsante

[biancocandido55]

Ciao Paolox,
ogni macro va rinominata diversamente, ad es. ordina10, ordina9 ecc...., ma anch'io non capisco come mai quando gira rimane "agganciata" alla colonna BD, mi spiace...
ciao bianco