Note: The other languages of the website are Google-translated. Back to English

Come combinare / importare più file CSV in più fogli di lavoro?

Se desideri importare più file CSV da una cartella come fogli di lavoro separati all'interno di una cartella di lavoro, come potresti gestire questo lavoro in Excel?

Importa più file CSV in fogli di lavoro separati con codice VBA

Importa più file CSV in fogli di lavoro separati con Kutools per Excel

Suddividi una cartella di lavoro in più file csv / pdf / txt / excel separati


Per importare rapidamente più file CSV in una cartella di lavoro, il seguente codice VBA potrebbe farti un favore, per favore fai come segue:

1. Tieni premuto il ALT + F11 in Excel per aprire il file Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Moduloe incolla il codice seguente nel file Modulo Finestra.

Codice VBA: importa più file di testo in fogli di lavoro separati:

Sub CombineCsvFiles()
'updateby Extendoffice
    Dim xFilesToOpen As Variant
    Dim I As Integer
    Dim xWb As Workbook
    Dim xTempWb As Workbook
    Dim xDelimiter As String
    Dim xScreen As Boolean
    On Error GoTo ErrHandler
    xScreen = Application.ScreenUpdating
    Application.ScreenUpdating = False
    xDelimiter = "|"
    xFilesToOpen = Application.GetOpenFilename("Text Files (*.csv), *.csv", , "Kutools for Excel", , True)
    If TypeName(xFilesToOpen) = "Boolean" Then
        MsgBox "No files were selected", , "Kutools for Excel"
        GoTo ExitHandler
    End If
    I = 1
    Set xTempWb = Workbooks.Open(xFilesToOpen(I))
    xTempWb.Sheets(1).Copy
    Set xWb = Application.ActiveWorkbook
    xTempWb.Close False
    Do While I < UBound(xFilesToOpen)
        I = I + 1
        Set xTempWb = Workbooks.Open(xFilesToOpen(I))
        xTempWb.Sheets(1).Move , xWb.Sheets(xWb.Sheets.Count)
    Loop
ExitHandler:
    Application.ScreenUpdating = xScreen
    Set xWb = Nothing
    Set xTempWb = Nothing
    Exit Sub
ErrHandler:
    MsgBox Err.Description, , "Kutools for Excel"
    Resume ExitHandler
End Sub

3. Quindi premere F5 tasto per eseguire questo codice e verrà visualizzata una finestra, vai alla cartella specifica e seleziona i file CSV che desideri importare in Excel, vedi screenshot:

doc importa csv nel foglio di lavoro 1

4. E poi clicca Apri pulsante, i file CSV selezionati sono stati importati come fogli di lavoro separati all'interno di una nuova cartella di lavoro.

5. Infine, puoi salvare la nuova cartella di lavoro di cui hai bisogno.


Se si dispone di Kutools for Excel, con il suo potente strumentoCombinare, puoi combinare o importare rapidamente più file CSV in un unico foglio di lavoro o più fogli di lavoro separati di cui hai bisogno.

Dopo l'installazione Kutools for Excel, per favore fai come questo:

1. Per favore clicca Kutools Plus > Combinare, vedi screenshot:

2. Nell' Combina fogli di lavoro finestra di dialogo, selezionare Combina più fogli di lavoro da cartelle di lavoro in una cartella di lavoro, vedi screenshot:

doc importa csv nel foglio di lavoro 6

3. Nel Passo 2 della procedura guidata, fare clic su Aggiungi > Compila il per scegliere i file CSV che desideri combinare, vedi screenshot:

doc importa csv nel foglio di lavoro 7

4. Nel saltò fuori Apri finestra di dialogo, selezionare (* .csv) dall'elenco a discesa, quindi specificare i file CSV che si desidera unire.

doc importa csv nel foglio di lavoro 8

5. Quindi fare clic Apri pulsante e i file CSV selezionati sono stati importati nella finestra di dialogo, vedi screenshot:

doc importa csv nel foglio di lavoro 9

6. Nel Passo 3 , eseguire le seguenti operazioni:

(1.) Controllo Prima riga di ogni foglio di lavoro (commenti) dal Inserisci le informazioni del foglio di lavoro sezione, tutte le informazioni sui file csv verranno inserite nei fogli combinati come commenti;

(2.) Puoi rinominare i file CSV di cui hai bisogno;

(3.) puoi saltare i file csv vuoti quando incontri un file csv vuoto.

doc importa csv nel foglio di lavoro 10

7. Quindi fare clic Fine e dopo aver terminato la combinazione, è possibile specificare un nome file e una posizione per la nuova cartella di lavoro combinata. Vedi screenshot:

doc importa csv nel foglio di lavoro 11

8. Quindi fare clic Risparmi pulsante, nella finestra di dialogo spuntata, è possibile aprire il nuovo file fare clic e chiuderlo facendo clic Non, vedi screenshot:

doc importa csv nel foglio di lavoro 12

9. E poi puoi salvare questo scenario o meno come preferisci. Vedi screenshot:

doc importa csv nel foglio di lavoro 13

10. Alla fine, i file csv selezionati sono stati importati in una nuova cartella di lavoro con un foglio di lavoro separato, vedi screenshot:

doc importa csv nel foglio di lavoro 14

Scarica e prova gratuitamente Kutools per Excel ora!


Kutools for Excel: con più di 300 utili componenti aggiuntivi di Excel, liberi di provare senza limitazioni in 30 giorni. Scarica e prova gratuita ora!

In alcuni casi, potresti voler dividere una cartella di lavoro in file CSV separati, Kutools per l'utilità Cartella di lavoro divisa di Excel può completare questo lavoro rapidamente e facilmente.

Dopo l'installazione Kutools for Excel, per favore fai come questo:

1. Clic Kutools Plus > Cartella di lavoro > Cartella di lavoro divisa, vedi screenshot:

2. Nell' Cartella di lavoro divisa la finestra di dialogo:

(1.) Controlla i fogli di lavoro che vuoi dividere;

(2.) E controlla Specifica salvaformato, quindi scegli il formato di file che desideri salvare;

(3.) Quindi fare clic su Diviso e specificare una cartella in cui inserire i file separati.

doc importa csv nel foglio di lavoro 3

3. E poi clicca OK per iniziare a dividere, la cartella di lavoro verrà divisa in file CSV separati di cui hai bisogno.

doc importa csv nel foglio di lavoro 4

Scarica e prova gratuitamente Kutools per Excel ora!


Kutools for Excel: con più di 300 utili componenti aggiuntivi di Excel, liberi di provare senza limitazioni in 30 giorni. Scarica 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 kte 201905

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!
fondo officetab
Commenti (7)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
Grazie per il codice sulla combinazione di file. Tuttavia, voglio avere più file nella cartella di lavoro con cui sto attualmente lavorando, non che il codice crei una nuova cartella di lavoro. Come faccio a raggiungerlo?
Questo commento è stato fatto dal moderatore sul sito
Grazie per aver condiviso questo codice. È esattamente quello che stavo cercando. Purtroppo non funziona come speravo. Ricevo un messaggio di errore ogni volta che viene eseguito il codice. ERRORE: "Il nome è già stato preso. Provane uno diverso." Note: - Sto cercando di combinare quattro file CSV - Tutti i file CSV hanno lo stesso nome "nome_file.csv, nome_file(1).csv, ecc..." Il codice combina i primi due file CSV in una cartella di lavoro e il terzo file nella propria cartella di lavoro. Il quarto file non ha mai avuto una possibilità a causa dell'errore. Se qualcuno ha qualche idea su come risolvere questo problema, apprezzerei molto il tuo feedback. Grazie a tutti in anticipo per il vostro tempo. Cordiali saluti, Andrea
Questo commento è stato fatto dal moderatore sul sito
Grazie! Il codice è stato molto utile
Questo commento è stato fatto dal moderatore sul sito
Grazie . Molto maneggevole
Questo commento è stato fatto dal moderatore sul sito
Grazie. Il codice funziona bene
Questo commento è stato fatto dal moderatore sul sito
Ciao, questa macro vba è fantastica, ma voglio che venga avviata facendo clic su un pulsante su un'altra cartella di lavoro, come posso farlo?
Questo commento è stato fatto dal moderatore sul sito
Ciao!
Ho usato questo codice per combinare i moduli di valutazione in un foglio excel. Tuttavia, legge le date nel formato statunitense MM/GG/AAAA invece del formato europeo che uso, che è GG/MM/AAAA. Il risultato è una colonna simile a questa:

11-4-2021 17:13
22/10/2021 09:41:32 (Questo è il 22 ottobre, ma non è riconosciuto)
7-12-2022 14:55 (Questo è erroneamente letto come 7 dicembre, quando dovrebbe essere il 12 luglio.)
27/10/2021 16:53:19
29/10/2021 09:44:26
11-1-2021 11:36
11-2-2021 14:11
17/08/2022 16:46:06
11-1-2021 10:49
8-10-2022 12:19
22/10/2021 14:54:58
17/11/2021 13:48:54
26/10/2021 20:13:37
22/10/2021 16:26:13

Come posso evitare che ciò accada? Ho visto un commento su un altro post ciò suggeriva di inserire "Local=True" da qualche parte, ma non sono stato in grado di capire dove inserirlo in modo che i file CSV vengano caricati correttamente. Qualsiasi aiuto è apprezzato!
Non ci sono ancora commenti pubblicati qui
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite

Seguici

Copyright © 2009 - www.extendoffice.com. | Tutti i diritti riservati. Offerto da ExtendOffice, | Mappa del sito
Microsoft e il logo Office sono marchi o marchi registrati di Microsoft Corporation negli Stati Uniti e / o in altri paesi.
Protetto da Sectigo SSL