Come copiare e inserire la riga più volte o duplicare la riga x volte in Excel?
Nel tuo lavoro quotidiano, hai mai provato a copiare una riga o ogni riga e quindi inserire più volte sotto la riga di dati corrente in un foglio di lavoro? Ad esempio, ho un intervallo di celle, ora, voglio copiare ogni riga e incollarle 3 volte nella riga successiva come mostrato nella seguente schermata. Come hai potuto affrontare questo lavoro in Excel?
![]() |
![]() |
![]() |
- Copia e inserisci una riga specifica più volte con il codice VBA
- Copia e inserisci ogni riga più volte con il codice VBA
- Copia e inserisci ogni riga più volte in base a un numero specifico con una funzionalità fantastica
Copia e inserisci una riga specifica più volte con il codice VBA
Se vuoi duplicare solo una riga specifica x volte, il seguente codice VBA può aiutarti, per favore fai come segue:
1. Specificare una riga che si desidera copiare e inserire più volte, quindi tenere premuto il tasto ALT + F11 chiavi, quindi apre il file Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Moduloe incolla il codice seguente nel file Modulo Finestra.
Codice VBA: duplica una riga specifica più volte:
Sub test()
'Updateby Extendoffice
Dim xCount As Integer
LableNumber:
xCount = Application.InputBox("Number of Rows", "Kutools for Excel", , , , , , 1)
If xCount < 1 Then
MsgBox "the entered number of rows is error, please enter again", vbInformation, "Kutools for Excel"
GoTo LableNumber
End If
ActiveCell.EntireRow.Copy
Range(ActiveCell.Offset(1, 0), ActiveCell.Offset(xCount, 0)).EntireRow.Insert Shift:=xlDown
Application.CutCopyMode = False
End Sub
3. Dopo aver incollato il codice, premere F5 chiave per eseguire questo codice e viene visualizzata una finestra di messaggio per ricordarti di inserire il numero di volte che desideri duplicare, vedi screenshot:
4. Quindi fare clic OK pulsante e tre nuove righe copiate sono state inserite sotto la riga selezionata, vedi screenshot:
Copia e inserisci facilmente ogni riga più volte in base a un numero specifico
Normalmente, non esiste un buon metodo per copiare e inserire righe più volte tranne che per la copia e l'inserimento manuale. Ma con Kutools for Excel's Righe / colonne duplicate in base al valore della cella funzionalità, puoi risolvere questo problema con facilità. Fai clic per scaricare Kutools per Excel!
Kutools for Excel: con più di 300 utili componenti aggiuntivi di Excel, liberi di provare senza limitazioni in 60 giorni. Scarica e prova gratuita ora!
Copia e inserisci ogni riga più volte con il codice VBA
Per duplicare ogni riga più volte in un intervallo, puoi applicare il seguente codice VBA, per favore fai come di seguito:
1. Tieni premuto il ALT + F11 chiavi, quindi apre il file Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Moduloe incolla il codice seguente nel file Modulo Finestra.
Codice VBA: duplica ogni riga più volte:
Sub insertrows()
'Updateby Extendoffice
Dim I As Long
Dim xCount As Integer
LableNumber:
xCount = Application.InputBox("Number of Rows", "Kutools for Excel", , , , , , 1)
If xCount < 1 Then
MsgBox "the entered number of rows is error ,please enter again", vbInformation, "Kutools for Excel"
GoTo LableNumber
End If
For I = Range("A" & Rows.CountLarge).End(xlUp).Row To 2 Step -1
Rows(I).Copy
Rows(I).Resize(xCount).Insert
Next
Application.CutCopyMode = False
End Sub
3. E poi premere F5 chiave per eseguire questo codice e viene visualizzata una finestra di messaggio per ricordarti di inserire il numero di volte che desideri duplicare per ogni record, vedi screenshot:
4. Quindi fare clic OK, e ogni riga è stata copiata e inserita 3 volte sotto quelle attive, vedi screenshot:
![]() |
![]() |
![]() |
Note:: Nel codice sopra, il A indica che l'intervallo di dati inizia dalla colonna A, se i dati iniziano dalla colonna K, per favore cambia A a K secondo le tue necessità.
Copia e inserisci ogni riga più volte in base a un numero specifico con una funzionalità fantastica
Forse non hai familiarità con il codice VBA o ti preoccupi che il codice causi l'arresto anomalo dei tuoi dati. Qui introdurrò una funzione utile, Kutools for Excel's Righe / colonne duplicate in base al valore della cella, con questa utility, puoi copiare e inserire rapidamente le righe in base al numero specificato.
Suggerimenti:Per applicare questo Righe / colonne duplicate in base al valore della cella in primo luogo, dovresti scaricare il file Kutools for Excele quindi applica la funzione in modo rapido e semplice.
Dopo l'installazione Kutools for Excel, per favore fai come questo:
1. Inserisci i numeri di ripetizione che desideri duplicare le righe in un elenco di celle accanto ai tuoi dati, vedi screenshot:
2. Clic Kutools > inserire > Righe / colonne duplicate in base al valore della cella, vedi screenshot:
3. Nel Copia e inserisci righe e colonne finestra di dialogo, selezionare Copia e inserisci righe opzione nel Tipologia sezione, quindi seleziona l'intervallo di dati che desideri duplicare, quindi specifica il tempo di ripetizione per duplicare le righe, vedi screenshot:
4. Quindi, fare clic Ok or APPLICA pulsante, otterrai il seguente risultato di cui hai bisogno:
![]() |
![]() |
![]() |
Fai clic per scaricare Kutools per Excel e prova gratuita ora!
I migliori strumenti per la produttività in ufficio
Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%
- Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
- Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
- Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
- Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
- Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
- Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
- Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
- Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
- Più di 300 potenti funzionalità. Supporta Office/Excel 2007-2021 e 365. Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.

Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!

























