Unire Unisci fogli di lavoro con lo stesso nome provenienti da più cartelle di lavoro in una sola
L’unione di dati da più Cartella di lavoro Excel in un unico foglio è un’esigenza comune in Analisi dei dati, specialmente quando si gestiscono report consolidati o aggregazioni di dati provenienti da diverse fonti. Ciò può risultare particolarmente complesso quando è necessario Unisci fogli di lavoro che hanno lo stesso nome in cartelle di lavoro diverse. Questa guida illustra due metodi efficaci per semplificare tale processo: l’utilizzo del codice VBA per chi preferisce un approccio pratico e programmabile, e l’impiego di Kutools per Excel per gli utenti che cercano una soluzione più intuitiva e automatizzata.
- Unire Unisci fogli di lavoro con lo stesso nome in uno mediante codice VBA
- Unire facilmente Unisci fogli di lavoro con lo stesso nome in uno con Kutools per Excel
Unire Unisci fogli di lavoro con lo stesso nome in uno mediante codice VBA
Questa sezione presenta un codice VBA per unire in un unico foglio tutti i fogli di lavoro con lo stesso nome provenienti da più cartelle di lavoro. Segui questi passaggi:
- Premere «Alt» + «F11» per aprire l’Editor VBA.
- Nell’editor VBA, fare clic su «Inserisci» > «Modulo», quindi inserire il seguente codice VBA nel modulo.Codice VBA: Unisci Workbook con lo stesso nome in uno
Sub CombineSameNameSheetsFromMultipleWorkbooks() 'Updated by Extendoffice 2025/3/27 Dim wsTarget As Worksheet Dim wbTarget As Workbook Dim wbSource As Workbook Dim wsSource As Worksheet Dim strSheetName As String Dim fd As FileDialog Dim FileChosen As Integer Dim FileName As String Dim lastRow As Long ' Set the name of the sheets to combine strSheetName = "SheetName" ' Change "SheetName" to the name of your sheet Set wbTarget = Workbooks.Add Set wsTarget = wbTarget.Sheets(1) wsTarget.Name = "Combined Data" Set fd = Application.FileDialog(msoFileDialogFilePicker) fd.AllowMultiSelect = True FileChosen = fd.Show If FileChosen = -1 Then For Each varFile In fd.SelectedItems Set wbSource = Workbooks.Open(varFile) On Error Resume Next Set wsSource = wbSource.Sheets(strSheetName) On Error GoTo 0 If Not wsSource Is Nothing Then lastRow = wsTarget.Cells(wsTarget.Rows.Count, 1).End(xlUp).Row wsSource.UsedRange.Copy Destination:=wsTarget.Cells(lastRow + 1, 1) Set wsSource = Nothing End If wbSource.Close False Next varFile End If MsgBox "Data has been combined successfully!", vbInformation End SubNota: prima di eseguire il codice, è necessario modificare «SheetName» nella variabile «strSheetName» con il nome effettivo dei fogli che si desidera combinare.
- Premere «F5» per eseguire il codice. Si aprirà la finestra «Seleziona il file di Excel»: scegli le cartelle di lavoro che contengono i fogli con lo stesso nome da combinare, quindi fai clic su «Apri».
- Al termine dell’unione, apparirà una finestra di dialogo di «Microsoft Excel» a conferma che i fogli di lavoro sono stati combinati correttamente. Fare clic su «OK» per chiuderla.
Ora il contenuto di tutti i fogli di lavoro con lo stesso nome delle cartelle selezionate è stato unito in un unico foglio all’interno di una nuova cartella di lavoro.
Unire facilmente Unisci fogli di lavoro con lo stesso nome in uno con Kutools per Excel
Sebbene VBA offra potenti funzionalità di automazione in Excel, può risultare complesso e intimidatorio per chi non ha competenze di programmazione. Inoltre, richiede attente misure di sicurezza e può presentare problemi di compatibilità. Al contrario, «Kutools per Excel» propone un’alternativa più intuitiva e sicura per unire facilmente fogli di lavoro provenienti da più cartelle, eliminando la necessità di scrivere codice complesso e rendendo l’operazione accessibile a tutti gli utenti di Excel.
Kutools per Excel – Include oltre 300 strumenti essenziali per Excel, rendendo le tue attività più veloci, semplici ed efficienti.Scarica ora!
Dopo aver installato Kutools per Excel, seleziona «KUTOOLS PLUS» > «Combina» per avviare la procedura guidata «Unisci fogli di lavoro». Configurala quindi come segue.
- Nella procedura guidata «Unisci fogli di lavoro – Passaggio 1 di 3», seleziona l’opzione «Unisci dati da più cartelle di lavoro con lo stesso nome di foglio di lavoro» e fai clic su «Avanti».
- Nella procedura guidata «Passaggio 2 di 3», fare clic sul pulsante «Aggiungi» per selezionare le cartelle di lavoro che contengono i fogli con lo stesso nome da combinare.Nota: se le cartelle di lavoro sono salvate in una cartella, è possibile fare clic sulla freccia a discesa accanto al pulsante «Aggiungi» per espandere il sottomenu, quindi selezionare «Cartella» per aggiungere rapidamente tutte le File di Excel presenti in quella cartella.
- Dopo aver aggiunto le cartelle di lavoro, si hanno due opzioni a seconda delle proprie esigenze:
- Se si desidera combinare tutti i fogli di lavoro delle cartelle selezionate in un’unica cartella, basta fare clic sul pulsante «Avanti». Tutti i fogli verranno uniti e il contenuto di quelli con lo stesso nome sarà accorpato in un unico foglio.
- Se si desidera combinare solo i fogli di lavoro con lo stesso nome, selezionare innanzitutto **Seleziona un foglio di lavoro** nella sezione «Elenco dei fogli di lavoro», quindi fare clic sul pulsante **«Foglio identico»**. L’azione selezionerà automaticamente tutti i fogli con lo stesso nome presenti nelle cartelle aggiunte. Cliccare infine su **«Avanti»** per procedere.
- Nell’ultimo passaggio della procedura guidata, lascia selezionata l’opzione predefinita oppure personalizza le impostazioni in base alle tue esigenze, quindi fai clic su «Fine».
- Scegli una cartella di destinazione per la cartella di lavoro combinata, inserisci un nome file a tuo piacimento e fai clic su «Salva» per completare l’operazione.
Unire fogli di lavoro con lo stesso nome provenienti da più cartelle di lavoro è semplice ed efficiente grazie agli strumenti giusti. Che tu preferisca metodi integrati o componenti aggiuntivi avanzati, entrambi gli approcci offrono soluzioni affidabili, adatte a ogni livello di competenza. Padroneggiare queste tecniche migliorerà notevolmente la tua produttività e semplificherà la consolidazione dei dati in Excel.
Kutools per Excel– Potenzia Excel con oltre 300 strumenti essenziali, rendendo il tuo lavoro più veloce e semplice, e sfrutta le funzionalità basate sull’IA per un’elaborazione dati più intelligente e una maggiore produttività.Scaricalo ora
Per ulteriori informazioni su questa funzionalità, consulta questa pagina:Unisci dati da più cartelle di lavoro con lo stesso nome di foglio di lavoro tutorial.
Articoli correlati:
Come unire più cartelle di lavoro in un’unica cartella di lavoro in Excel?
Come unire più fogli di lavoro o cartelle di lavoro in un unico foglio?
Come riepilogare i dati provenienti da più fogli di lavoro o cartelle di lavoro in un unico foglio?
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 oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità 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 all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi