Come copiare e inserire una 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 poi inserirla 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 nello screenshot seguente. Come potresti gestire questo compito 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 potrebbe aiutarti, procedi come segue:
1. Specifica una riga che desideri copiare e inserire più volte, quindi tieni premuti i tasti ALT + F11, quindi si aprirà la finestra Microsoft Visual Basic for Applications.
2. Clicca su Inserisci > Modulo, e incolla il seguente codice nella Finestra del Modulo.
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, premi il tasto F5 per eseguire questo codice, e apparirà una finestra di dialogo che ti chiederà di inserire il numero di volte che desideri duplicare, vedi screenshot:
4. Quindi clicca sul pulsante OK, e tre nuove righe copiate sono state inserite sotto la riga selezionata, vedi screenshot:
Copia e inserisci ogni riga più volte in base a un numero specifico facilmente
Normalmente, non esiste un buon metodo per copiare e inserire righe più volte se non copiandole e inserendole manualmente. Ma, con Kutools per Excel e la sua funzione Duplica Righe/Colonne basata sul valore della cella, puoi risolvere questo problema con facilità. Clicca per scaricare Kutools per Excel!
Kutools per Excel: con oltre 300 utili add-in per Excel, prova gratuita senza limitazioni per 60 giorni. Scarica e prova gratis adesso!
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, procedi come segue:
1. Tieni premuti i tasti ALT + F11, quindi si aprirà la finestra Microsoft Visual Basic for Applications.
2. Clicca su Inserisci > Modulo, e incolla il seguente codice nella Finestra del Modulo.
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 premi il tasto F5 per eseguire questo codice, e apparirà una finestra di dialogo che ti chiederà di inserire il numero di volte che desideri duplicare per ogni record, vedi screenshot:
4. Quindi clicca su OK, e ogni riga è stata copiata e inserita 3 volte sotto quelle attive, vedi screenshot:
![]() | ![]() | ![]() |
Nota: Nel codice sopra, la A indica che l'intervallo dati inizia nella colonna A, se i tuoi dati iniziano nella colonna K, cambia A a K secondo necessità.
Copia e inserisci ogni riga più volte in base a un numero specifico con una funzionalità fantastica
Forse, non sei familiare con il codice VBA, o temi che il codice possa danneggiare i tuoi dati. Qui, ti presenterò una funzione utile, Duplica Righe/Colonne basata sul valore della cella di Kutools per Excel, con questa utility, puoi copiare e inserire rapidamente le righe in base al numero specificato.
Suggerimenti:Per applicare questa funzione Duplica Righe/Colonne basata sul valore della cella, prima di tutto, dovresti scaricare Kutools per Excel, e poi applicare la funzione rapidamente e facilmente.
Dopo aver installato Kutools per Excel, procedi come segue:
1. Inserisci i numeri di ripetizione che desideri duplicare in una lista di celle accanto ai tuoi dati, vedi screenshot:
2. Clicca su Kutools > Inserisci > Duplica Righe/Colonne basata sul valore della cella, vedi screenshot:
3. Nella finestra di dialogo Copia e inserisci righe e colonne, seleziona l'opzione Copia e inserisci righe nella sezione Tipo, quindi seleziona l'intervallo di dati che desideri duplicare, e poi specifica il tempo di ripetizione per duplicare le righe, vedi screenshot:
4. Quindi, clicca su Ok o Applica, otterrai il seguente risultato di cui hai bisogno:
![]() | ![]() | ![]() |
Clicca per scaricare Kutools per Excel e prova gratis adesso!
I migliori strumenti per la produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un'efficienza mai vista prima. Kutools per Excel offre oltre300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Clicca qui per ottenere la funzione di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- 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, invece che in nuove finestre.
- Aumenta la tua produttività del50% e riduce centinaia di clic del mouse ogni giorno!