I cookie ci aiutano i nostri servizi. Utilizzando i nostri servizi, l'utente accetta di utilizzare i cookie.
Suggerimento: le altre lingue sono tradotte da Google. Puoi visitare il English versione di questo link.
Log In
x
or
x
x
Registrati
x

or

Come combinare più cartelle di lavoro in una cartella di lavoro in Excel?

Sei mai stato bloccato quando devi combinare più cartelle di lavoro in una singola cartella di lavoro in Excel? La cosa più terribile è che la cartella di lavoro che devi combinare contiene più fogli di lavoro. Qualcuno può suggerire un buon modo per gestire questo problema?

Combina più cartelle di lavoro in una cartella di lavoro con VBA

Combina più cartelle di lavoro in una cartella di lavoro con il comando Sposta o Copia

Unisci facilmente più cartelle di lavoro a una cartella di lavoro con Kutools per Excel


Combina facilmente più fogli di lavoro / cartelle di lavoro in un foglio di lavoro / cartella di lavoro:

Combinare più fogli di lavoro o cartelle di lavoro in un unico foglio di lavoro o cartella di lavoro può essere un compito enorme nel tuo lavoro quotidiano. Ma se lo hai Kutools for Excel, la sua potente utilità - Combinare può aiutarti a combinare rapidamente più fogli di lavoro, cartelle di lavoro in un foglio di lavoro o in una cartella di lavoro. Scarica ora la traccia completa di Xutox-day di Kutools per Excel!

Kutools for Excel: con più di 200 pratici componenti aggiuntivi di Excel, liberi di provare senza limitazioni nei giorni 60. Scarica e prova gratis ora!


Combina più cartelle di lavoro in una cartella di lavoro con VBA

Per i programmatori esperti e professionisti, è possibile utilizzare gli script VBA per combinare più cartelle di lavoro in una cartella di lavoro principale. Puoi affrontare questo con i seguenti passi:

1. Metti tutte le cartelle di lavoro che vuoi combinare nella stessa directory. Vedi screenshot:

2. Avviare un file Excel in cui si desidera combinare altre cartelle di lavoro.

3. Clic Sviluppatore > Visual Basic, un nuovo Microsoft Visual Basic per le applicazioni verrà visualizzata la finestra, fare clic inserire > Moduloe inserisci il seguente codice nel modulo:

Sub GetSheets()
Path = "C:\Users\dt\Desktop\dt kte\"
Filename = Dir(Path & "*.xls")
  Do While Filename <> ""
  Workbooks.Open Filename:=Path & Filename, ReadOnly:=True
     For Each Sheet In ActiveWorkbook.Sheets
     Sheet.Copy After:=ThisWorkbook.Sheets(1)
  Next Sheet
     Workbooks(Filename).Close
     Filename = Dir()
  Loop
End Sub

Mancia: Nel codice sopra, puoi cambiare il percorso di quello che stai usando.

4. Quindi fare clic doc-merge-multiple-cartelle di lavoro-tasto per eseguire il codice e tutti i fogli di lavoro (inclusi i fogli di lavoro vuoti) all'interno delle cartelle di lavoro sono stati uniti nella cartella di lavoro principale.

Note: Questo codice VBA può unire l'intera cartella di lavoro nella cartella di lavoro principale, se si desidera combinare fogli di lavoro specifici delle cartelle di lavoro, questo codice non funzionerà.


Combina più cartelle di lavoro in una cartella di lavoro con il comando Sposta o Copia

Se sei un principiante di Microsoft Excel, non hai altra scelta, ma devi solo copiare i dati di ogni foglio e incollarli in una nuova cartella di lavoro uno alla volta e applicare il comando Sposta o Copia. Usando il Sposta o copia comando ti aiuterà a esportare o copiare uno o più fogli di lavoro in una nuova cartella di lavoro rapidamente.

1. Aprire tutte le cartelle di lavoro che si desidera unire in una singola cartella di lavoro.

2. Seleziona tutti i nomi del foglio di lavoro di una cartella di lavoro nella barra delle schede. Puoi selezionare multipli tenendo premuto Ctrl chiave o spostamento chiave. Fare clic con il pulsante destro del mouse sul nome del foglio di lavoro e fare clic su Sposta o copia dal menu di scelta rapida.

3. in Sposta o copia finestra di dialogo, selezionare la cartella di lavoro principale in cui si desidera unire altre cartelle di lavoro dall'elenco a discesa di Sposta i fogli selezionati per prenotare. E quindi specificare la posizione dei fogli di lavoro uniti. Vedi gli screenshot:

4. Quindi fare clic OK. I fogli di lavoro selezionati sono stati spostati nella cartella di lavoro principale.

5. Ripetere i passaggi da 2 a 4 per spostare altre cartelle di lavoro nella cartella di lavoro principale. Quindi combina tutti i fogli di lavoro delle cartelle di lavoro aperte in un'unica cartella di lavoro. Vedi gli screenshot:


Unisci facilmente più cartelle di lavoro a una cartella di lavoro con Kutools per Excel

Fortunatamente, per i principianti e le nuove mani di Microsoft Excel, ci sono alcuni strumenti disponibili per aiutarti a combinare rapidamente centinaia di cartelle di lavoro in una sola. La funzione Combinare in Kutools for Excel rende molto più facile combinare più file Excel. L'applicazione viene utilizzata per il rilascio delle operazioni ripetitive e ridondanti in Excel. In realtà svolge un ruolo importante se devi gestire una grande quantità di file Excel nel tuo lavoro quotidiano. Ora, vediamo come far funzionare questa funzione combinando più cartelle di lavoro.

Kutools for Excel : con più di 300 utili componenti aggiuntivi di Excel, libero di provare senza limiti nei giorni 60.

1. Abilita Excel e fai clic Kutools Plus > Combinare. Quindi viene visualizzata una finestra di dialogo per ricordare che tutte le cartelle di lavoro combinate devono essere salvate e che la funzionalità non può essere applicata alle cartelle di lavoro protette, fare clic sul OK pulsante.

2. Nel Combina fogli di lavoro procedura guidata, selezionare Combina più fogli di lavoro da cartelle di lavoro in una cartella di lavoroe quindi fare clic su Successivo pulsante. Vedi screenshot:

2. Quindi puoi vedere tutte le cartelle di lavoro e i fogli di lavoro aperti sono elencati in Combina fogli di lavoro - Passo 2 di 3 la finestra di dialogo. Clicca il aggiungere > filetto / cartella per aggiungere altri file o cartelle di Excel che contengono i file Excel che combinerai. Dopo aver selezionato i file, fare clic su Successivo pulsante per andare avanti. Vedi screenshot:

doc unisce più cartelle di lavoro arrow1

3. Nel Combina fogli di lavoro - Passo 3 di 3 finestra di dialogo, si prega di fare le seguenti impostazioni:

  • 3.1 È possibile escludere tutti i fogli di lavoro vuoti dall'unione selezionando Saltare dal Quando si incontra un foglio di lavoro vuoto menu `A tendina.
  • 3.2 Controlla il Prima riga di ogni foglio di lavoro (Commento) opzione per inserire le informazioni del foglio di lavoro di ogni foglio di lavoro combinato.
  • 3.3 È possibile rinominare i nuovi fogli di lavoro combinati inserendo i nomi della cartella di lavoro prima o dopo i nomi del foglio di lavoro originale oppure mantenere i nomi dei fogli di lavoro originali senza deselezionare Inserendo il nome della cartella di lavoro opzione.
  • 3.4 Fare clic su Fine pulsante.

4. Quindi scegli una cartella per salvare la cartella di lavoro combinata e aprila direttamente come ti serve. Ora tutte le cartelle di lavoro specificate sono combinate in una sola.

Note:

1. Ti verrà chiesto se vuoi salvare questo scenario. Clic per salvare come necessario, quindi inserire il nome dello scenario, (vedere le schermate seguenti). Dopo aver salvato lo scenario, è sufficiente fare clic Scenario pulsante per scegliere il nome dello scenario sulla procedura guidata step2 per utilizzarlo direttamente.

2. I fogli di lavoro delle cartelle di lavoro selezionate sono stati uniti in una nuova cartella di lavoro ei nomi dei fogli di lavoro vengono nominati con il nome della cartella di lavoro prima o dopo il nome del foglio di lavoro originale se è stato selezionato Inserendo il nome della cartella di lavoro opzione. Nel frattempo, un nuovo foglio di lavoro chiamato Kutools for Excel viene generato prima di tutti i fogli di lavoro, che elenca le cartelle di lavoro con informazioni dettagliate su ciascun foglio di lavoro. Vedi screenshot:

3. Se il nome del foglio di lavoro è troppo lungo, forse i caratteri del nome sono maggiori di 31 caratteri, il nome combinato non verrà visualizzato e mostrerà solo il nome del foglio originale.

Tipo.Se vuoi avere una prova gratuita di questa utility, per favore vai a scarica il software liberamente prima, quindi vai ad applicare l'operazione in base ai passaggi precedenti.


Office Tab - Navigazione a schede, modifica e gestione delle cartelle di lavoro in Excel:

Office Tab offre un'interfaccia a schede come mostrato nei browser Web come Google Chrome, le nuove versioni di Internet Explorer e Firefox in Microsoft Excel. Sarà uno strumento che fa risparmiare tempo e che è irrealizzabile nel tuo lavoro. Vedi sotto demo:

Clicca per la prova gratuita di Office Tab!

Scheda Office per Excel

Demo: combina facilmente più cartelle di lavoro a una cartella di lavoro con Kutools per Excel




Articoli Correlati:



Strumenti di produttività consigliati

Office Tab

stella d&#39;oro1 Porta pratiche schede ad Excel e ad altri software Office, proprio come Chrome, Firefox e il nuovo Internet Explorer.

Kutools for Excel

stella d&#39;oro1 Stupefacente! Aumenta la tua produttività in 5 minuti. Non servono abilità speciali, risparmiate due ore al giorno!

stella d&#39;oro1 300 Nuove funzionalità per Excel, rendono Excel molto semplice e potente:

  • Unisci cella / righe / colonne senza perdere dati.
  • Combina e consolida più fogli e cartelle di lavoro.
  • Confronta intervalli, copia intervalli multipli, conversione testo in data, unità e conversione valuta.
  • Contare in base a colori, totali parziali cercapersone, ordinamento avanzato e filtro super,
  • Altro Seleziona / Inserisci / Elimina / Testo / Formato / Link / Commento / Cartelle di lavoro / Fogli di lavoro Strumenti ...

Schermata di Kutools per Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Dezignext Technologies · 2 days ago
    I like using this technique better than using traditional "3D Formula" techniques in Excel.
  • To post as a guest, your comment is unpublished.
    Jonel · 1 months ago
    Note: This VBA code can merge the entire workbooks into the master workbook, if you want to combine specified worksheets of the workbooks, this code will not work.

    Can we have the module for VBA that above scene will work,
    • To post as a guest, your comment is unpublished.
      crystal · 11 hours ago
      Hi Jonel,
      The following code can help you solve the problem. You need to replace folder path and "Sheet1, Sheet3" with the specified folder path and worksheets as you need.

      Sub MergeSheets2()
      Dim xStrPath As String
      Dim xStrFName As String
      Dim xWS As Worksheet
      Dim xMWS As Worksheet
      Dim xTWB As Workbook
      Dim xStrAWBName As String
      Dim xI As Integer
      On Error Resume Next

      xStrPath = " C:\Users\DT168\Desktop\KTE\"
      xStrName = "Sheet1,Sheet3"

      xArr = Split(xStrName, ",")

      Application.ScreenUpdating = False
      Application.DisplayAlerts = False
      Set xTWB = ThisWorkbook
      xStrFName = Dir(xStrPath & "*.xlsx")
      Do While Len(xStrFName) > 0
      Workbooks.Open Filename:=xStrPath & xStrFName, ReadOnly:=True
      xStrAWBName = ActiveWorkbook.Name
      For Each xWS In ActiveWorkbook.Sheets
      For xI = 0 To UBound(xArr)
      If xWS.Name = xArr(xI) Then
      xWS.Copy After:=xTWB.Sheets(xTWB.Sheets.count)
      Set xMWS = xTWB.Sheets(xTWB.Sheets.count)
      xMWS.Name = xStrAWBName & "(" & xArr(xI) & ")"
      Exit For
      End If
      Next xI
      Next xWS
      Workbooks(xStrAWBName).Close
      xStrFName = Dir()
      Loop
      Application.ScreenUpdating = True
      Application.DisplayAlerts = True

      End Sub
  • To post as a guest, your comment is unpublished.
    Chris · 2 months ago
    When I run this, each sheet in the new workbook is being named based off of the sheet names of the original document rather than the filenames. Any idea what I might be doing wrong?
    • To post as a guest, your comment is unpublished.
      crystal · 11 hours ago
      Hi Chris,
      If you want to distinguish which worksheets in the master workbook came from where after merging, please apply the below VBA code to solve the problem.

      Sub MergeWorkbooks()
      Dim xStrPath As String
      Dim xStrFName As String
      Dim xWS As Worksheet
      Dim xMWS As Worksheet
      Dim xTWB As Workbook
      Dim xStrAWBName As String
      On Error Resume Next
      xStrPath = "C:\Users\DT168\Desktop\KTE\"
      xStrFName = Dir(xStrPath & "*.xlsx")
      Application.ScreenUpdating = False
      Application.DisplayAlerts = False
      Set xTWB = ThisWorkbook
      Do While Len(xStrFName) > 0
      Workbooks.Open Filename:=xStrPath & xStrFName, ReadOnly:=True
      xStrAWBName = ActiveWorkbook.Name
      For Each xWS In ActiveWorkbook.Sheets
      xWS.Copy After:=xTWB.Sheets(xTWB.Sheets.Count)
      Set xMWS = xTWB.Sheets(xTWB.Sheets.Count)
      xMWS.Name = xStrAWBName & "(" & xMWS.Name & ")"
      Next xWS
      Workbooks(xStrAWBName).Close
      xStrFName = Dir()
      Loop
      Application.ScreenUpdating = True
      Application.DisplayAlerts = True
      End Sub
  • To post as a guest, your comment is unpublished.
    Owen · 5 months ago
    It didnt work for me then I realized my files are .xlsx, so added the missing "x" to the Filename line.
  • To post as a guest, your comment is unpublished.
    Justin · 8 months ago
    This worked for me but I had to make sure I have to put "\" at the end of my path. Initially, I didn't have it and it wouldn't work.