Volevo sostituire il codice seguente
- Codice: Seleziona tutto
Sheets("LISTE").Select
Range("A2:M" & Cells(Rows.Count, 2).End(xlUp).Row).Select
Selection.Cut
Sheets("TEMP").Select
Range("A1048576").End(xlUp).Offset(1, 0).Select
ActiveSheet.Paste
con il seguente
- Codice: Seleziona tutto
Worksheets("LISTE").Range("A2:M" & Cells(Rows.Count, 2).End(xlUp).Row).Cut
Worksheets("TEMP").Range("A1048576").End(xlUp).Offset(1, 0).Paste
pensando che mi desse lo stesso risultato, invece con il primo codice effettivamente taglio tutte le celle dalla riga 2 fino all'ultima riga popolata, e le incollo correttamente nel secondo foglio,
invece con il secondo codice spesso, non taglia tutte le celle popolate.
è scritto in modo errato?