- Codice: Seleziona tutto
UC = Worksheets("Foglio1").Range("IV5").End(xlToLeft).Column + 1
Sheets("Foglio2").Range("b2:i20").Copy Destination:=Sheets("Foglio1").Cells(5, UC)
Ho registrato questo per selezionare l'intero range che deve copiare
- Codice: Seleziona tutto
Range("B2").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
ma come faccio a sostituirlo nella macro ?
Grazie dell'aiuto.