Ho un elenco molto lungo dal rigo A663 al rigo A802, dovrei aggiungere 5 righi per ogni numero, per esempio A663 devo aggiungere 5 righi come pure A664 ecc ecc
Grazie
Moderatori: Anthony47, Flash30005
Sub InserisciRighe()
UR = Worksheets("Foglio1").Range("A" & Rows.Count).End(xlUp).Row
For RR = UR To 664 Step -1
For Righe = 1 To 5
Rows(RR & ":" & RR).Insert Shift:=xlDown
Next Righe
Next RR
End Sub
Torna a Applicazioni Office Windows
Excel: formula automatica per evidenziare prodotto scaduto Autore: gamma_ray |
Forum: Applicazioni Office Windows Risposte: 3 |
Salvare file excel in formato html escludendo le immagini Autore: systemcrack |
Forum: Applicazioni Office Windows Risposte: 6 |
formula excel non visualizza risultato Autore: tommasog |
Forum: Applicazioni Office Windows Risposte: 6 |
Excel 2016 - Funzione SCARTO + INDIRETTO Autore: pl1957 |
Forum: Applicazioni Office Windows Risposte: 2 |
Visitano il forum: Nessuno e 66 ospiti