Visualizza messaggio singolo
Vecchio 09-01-2018, 17.49.50   #3
paky89
Newbie
 
Registrato: 28-12-2017
Messaggi: 18
paky89 promette bene
Rif: macro per inserire righe

Quota:
Inviato da Alexsandra Visualizza messaggio
copia questo codice in un modulo
Codice:
Sub ultima_riga2()
ultimar = Range("A" & Rows.Count).End(xlUp).Row
Rows(ultimar - 1).Insert Shift:=xlDown
End Sub
Fatto..ma mi porta un debug..
Codice:
Sub ultima_riga2()
ultimar = Range("A" & Rows.Count).End(xlUp).Row
Rows(ultimar - 1).Insert Shift:=xlDown
End Sub
paky89 non è collegato   Rispondi citando