Unisci fogli di lavoro con lo stesso nome da più cartelle di lavoro in uno solo

L'unione dei dati provenienti da più cartelle di lavoro di Excel in un unico foglio è una necessità comune nell'analisi dei dati, soprattutto quando si ha a che fare con report consolidati o aggregazione di dati provenienti da varie fonti. Questo può essere particolarmente impegnativo quando è necessario combinare fogli di lavoro che hanno lo stesso nome in diverse cartelle di lavoro. Questa guida ti accompagnerà attraverso due metodi efficaci per semplificare questo processo: utilizzando il codice VBA per coloro che preferiscono un approccio pratico e programmabile, e utilizzando Kutools per Excel per gli utenti che cercano una soluzione più user-friendly e automatizzata.

• Unisci fogli di lavoro con lo stesso nome in uno solo con il codice VBA
• Unisci facilmente fogli di lavoro con lo stesso nome in uno solo con Kutools per Excel

Unisci fogli di lavoro con lo stesso nome in uno solo con il codice VBA

Questa sezione fornisce un codice VBA per combinare fogli di lavoro con lo stesso nome da più cartelle di lavoro in una sola; procedi come segue:

1. Premi "Alt" + "F11" per aprire l'editor VBA.
2. Nell'editor VBA, clicca su "Inserisci" > "Modulo", quindi inserisci il seguente codice VBA nel modulo.
   Codice VBA: Unisci cartelle di lavoro con lo stesso nome in una sola

   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 Sub

   Nota: Prima di eseguire il codice, devi cambiare "SheetName" nella variabile "strSheetName" con il nome effettivo dei fogli che desideri combinare.

   

3. Premi "F5" per eseguire il codice. Apparirà una finestra "Seleziona i file di Excel", scegli le cartelle di lavoro che contengono i fogli di lavoro con lo stesso nome che vuoi combinare, quindi clicca sul pulsante "Apri".

   

4. Una volta completata l'unione, apparirà una finestra di dialogo "Microsoft Excel" per confermare che i fogli di lavoro sono stati combinati con successo. Clicca su "OK" per chiuderla.

   

Ora, il contenuto di tutti i fogli di lavoro con lo stesso nome delle cartelle di lavoro selezionate è stato unito in un unico foglio di lavoro in una nuova cartella di lavoro.

Unisci facilmente fogli di lavoro con lo stesso nome in uno solo con Kutools per Excel

Sebbene VBA offra potenti capacità di automazione in Excel, può essere complesso e scoraggiante per gli utenti senza competenze di programmazione. Inoltre, VBA richiede attenzione alle pratiche di sicurezza e può presentare problemi di compatibilità. Al contrario, "Kutools per Excel" offre un'alternativa più user-friendly e sicura per semplificare il processo di combinazione dei fogli di lavoro da più cartelle di lavoro, eliminando la necessità di codici complessi e rendendo l'operazione accessibile a tutti gli utenti di Excel.

Dopo aver installato Kutools per Excel, seleziona "Kutools Plus" > "Unisci" per aprire la procedura guidata "Unisci Fogli di Lavoro". Quindi configura come segue.

1. Nella procedura guidata "Unisci Fogli di Lavoro – Passo 1 di 3", seleziona l'opzione "Unisci tutti i fogli di lavoro con lo stesso nome in un unico foglio di lavoro" e clicca su "Avanti".

   

2. Nella procedura guidata "Passo 2 di 3", clicca sul pulsante "Aggiungi" per selezionare le cartelle di lavoro che contengono i fogli di lavoro con lo stesso nome che vuoi combinare.
   Nota: Se le cartelle di lavoro sono salvate in una cartella, puoi cliccare sulla freccia a discesa accanto al pulsante "Aggiungi" per espandere il sottomenu, quindi selezionare "Cartella" per aggiungere rapidamente tutti i file di Excel da quella cartella.

   

3. Dopo aver aggiunto le cartelle di lavoro, hai due opzioni a seconda delle tue esigenze:
   • Se vuoi combinare tutti i fogli di lavoro delle cartelle di lavoro selezionate in una sola cartella di lavoro, clicca semplicemente sul pulsante "Avanti". Tutti i fogli di lavoro verranno combinati e il contenuto dei fogli con lo stesso nome sarà unito in un unico foglio di lavoro.
   • Se vuoi combinare solo i fogli di lavoro con lo stesso nome, prima seleziona un foglio di lavoro nella sezione "Elenco dei fogli di lavoro", quindi clicca sul pulsante "Stesso foglio di lavoro". Questo selezionerà automaticamente tutti i fogli di lavoro con lo stesso nome tra le cartelle di lavoro aggiunte. Dopo di che, clicca su "Avanti" per procedere.

   

4. Nel passaggio finale della procedura guidata, mantieni l'opzione predefinita selezionata oppure personalizza le impostazioni secondo le tue esigenze, quindi clicca su "Fine".

   

5. Scegli una cartella di destinazione per la cartella di lavoro combinata, inserisci un nome file come desiderato, quindi clicca sul pulsante "Salva" per completare l'operazione.

   

La combinazione di fogli di lavoro con lo stesso nome da più cartelle di lavoro può essere eseguita in modo efficiente con gli strumenti giusti. Che tu preferisca metodi integrati o componenti aggiuntivi avanzati, entrambi gli approcci offrono soluzioni affidabili adatte a diversi livelli di competenza. Padroneggiare queste tecniche migliorerà significativamente la tua produttività e semplificherà la consolidazione dei dati in Excel.

Se vuoi saperne di più su questa funzionalità, consulta questa pagina: Tutorial su come unire tutti i fogli di lavoro con lo stesso nome in un unico foglio di lavoro.

Articoli correlati:

Come combinare più cartelle di lavoro in un'unica cartella di lavoro in Excel?

Come unire fogli di lavoro / cartelle di lavoro in un unico foglio di lavoro?

Come riepilogare i dati da fogli di lavoro / cartelle di lavoro in un unico foglio di lavoro?