Come combinare o importare più file CSV in altrettanti fogli di lavoro?
Se si desidera importare più file CSV da una cartella come fogli di lavoro separati all’interno di una singola cartella di lavoro, come si può eseguire questa operazione 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
Dividi una cartella di lavoro in più file CSV/PDF/TXT/File di Excel separati
Importa più file CSV in fogli di lavoro separati con codice VBA
Per importare rapidamente più file CSV in una cartella di lavoro, il seguente codice VBA potrebbe esserti molto utile. Ecco come procedere:
1. Tieni premuti i tasti ALT + F11 in Excel per aprire la finestra di Microsoft Visual Basic, Applications.
2. Fai clic su Inserisci > Modulo e incolla il seguente codice nella finestra del Modulo.
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. Premi quindi il tasto F5 per eseguire questo codice. Si aprirà una finestra: vai alla cartella specifica e seleziona i file CSV che desideri importare in Excel (vedi screenshot).
4. Fai quindi clic sul pulsante Apri; i file CSV selezionati saranno importati come fogli di lavoro separati all'interno di una nuova cartella di lavoro.
5. Infine, puoi salvare la nuova cartella di lavoro come desideri.
Importa più file CSV in fogli di lavoro separati con Kutools per Excel
Se hai Kutools per Excel, grazie al suo potente strumento Combina puoi unire o importare rapidamente più file CSV in un unico foglio di lavoro oppure in fogli di lavoro separati, a seconda delle tue esigenze.
Dopo aver installato Kutools per Excel, procedi come segue:
1. Fai clic su KUTOOLS PLUS > Combina (vedi screenshot).
2. Nella finestra di dialogo Unisci fogli di lavoro, seleziona Copia fogli di lavoro da più cartelle di lavoro in una sola cartella di lavoro (vedi screenshot).
3. Nel Passaggio 2 della procedura guidata, fai clic su Aggiungi > File per scegliere i file CSV da combinare (vedi screenshot).
4. Nella finestra Apri visualizzata, seleziona (*.csv) dall'elenco a discesa e specifica quindi i file CSV che desideri unire.
5. Fai quindi clic sul pulsante Apri; i file CSV selezionati saranno importati nella finestra di dialogo (vedi screenshot).
6. Nel Passaggio 3, procedi come segue:
(1.) Seleziona Nella prima riga di ogni foglio di lavoro (come commenti)nella sezione Aggiungi informazioni foglio di lavoro; le informazioni di tutti i file CSV verranno inserite nei fogli combinati come commenti;
(2.) Puoi rinominare i file CSV come preferisci;
(3.) Puoi saltare i file CSV vuoti non appena ne incontri uno.
7. Fai quindi clic sul pulsante Fine e, al termine dell’operazione di combinazione, potrai specificare un nome e una posizione per la nuova cartella di lavoro combinata (vedi screenshot).
8. Fai quindi clic sul pulsante Salva; nella finestra visualizzata, puoi aprire il file generato facendo clic su Sì e chiuderla facendo clic su No (vedi screenshot).
9. Puoi quindi salvare questo scenario o meno, a tuo piacimento (vedi screenshot).
10. Infine, i file CSV selezionati sono stati importati in una nuova cartella di lavoro con fogli separati (vedi screenshot).
Scarica e prova gratuitamente Kutools per Excel ora!
Dividi una cartella di lavoro in più file CSV/PDF/TXT/File di Excel separati
In alcuni casi potresti voler suddividere una cartella di lavoro in file CSV separati. L’utilità **Dividi documento** di Kutools per Excel ti permette di eseguire questa operazione in modo rapido e semplice.
Dopo aver installato Kutools per Excel, procedi come segue:
1. Fai clic su KUTOOLS PLUS > Cartella di lavoro > Dividi documento (vedi screenshot).
2.Nella finestra di dialogo Dividi documento:
(1.) Seleziona i fogli di lavoro che desideri dividere;
(2.) Seleziona anche Specifica formatosalvataggioe scegli il formato Tipo di file in cui desideri salvare;
(3.) Fai quindi clic sul pulsante Dividi e specifica una cartella in cui salvare i file separati.
3. Fai quindi clic su OK per avviare la divisione; la cartella di lavoro verrà suddivisa nei file CSV separati richiesti.
Scarica e prova gratuitamente Kutools per Excel ora!
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