excel 2003: ordinare un foglio con celle unite

[karug64]

A me non dà nessun errore e non posso fare tentativi con fogli disuguali al tuo

Allego file test

ciao

Penso di aver capito il perche' dell'errore.
La macro nel caso postato lavora sullo stesso foglio. Nel mio caso, invece, il comando viene lanciato dal foglio "Menu" e lavora sul foglio "Riepilogo". Puo' essere questoi il problema ?

Grazie

[karug64]

Doppio. Scusate

[Flash30005]

Non hai mai parlato di avere un menu
nelle macro test non metto riferimenti ai fogli anche perché non potevo sapere come hai denominato i fogli
per default excel usa Foglio1 e anche se avessi messo il riferimento al foglio1 saresti andato incontro all'errore se il tuo foglio fosse stato con altro nome (es. Foglio2 etc)

Quindi non devi far altro che settare come ws1 = a nome del foglio

Codice: Seleziona tutto

set ws1 = Worksheets("NomeTuoFoglio")

e ogni qualvolta incontri la parola Range o cells nella macro inserirai, prima della parola ws1.range... o ws1.cells...
oppure (meglio) se dopo il settaggio di ws1 insirisci la select

Codice: Seleziona tutto

ws1.select

in questo caso non hai alcun bisogno di effettuare modifiche alla macro

ciao