Come convertire in blocco più file di Excel in file CSV con Excel?
La conversione di file Excel in formato CSV può essere eseguita tramite la funzione «Salva con nome», ma elaborare manualmente più file uno alla volta richiede molto tempo. Se devi convertire in blocco diversi file Excel in altrettanti file CSV, questa guida ti propone due metodi efficienti:
Converti in blocco i File di Excel di una cartella in file CSV con VBA
Converti i fogli di una cartella di lavoro in file CSV separati con Kutools per Excel ![]()
Converti in blocco i File di Excel di una cartella in file CSV con VBA
In Excel non è disponibile una funzione integrata per eseguire rapidamente questa operazione, a meno che non si utilizzi VBA.
1. Avvia Excel e premi Alt + F11 per aprire la finestra di Microsoft Visual Basic for Applications.
2. Fai clic su Inserisci > Modulo per creare un nuovo modulo.
3. Copia il codice seguente e incollalo nella nuova finestra del modulo.
VBA: Converti in blocco i File di Excel in CSV
Sub WorkbooksSaveAsCsvToFolder()
'UpdatebyExtendoffice20181031
Dim xObjWB As Workbook
Dim xObjWS As Worksheet
Dim xStrEFPath As String
Dim xStrEFFile As String
Dim xObjFD As FileDialog
Dim xObjSFD As FileDialog
Dim xStrSPath As String
Dim xStrCSVFName As String
Dim xS As String
Application.ScreenUpdating = False
Application.EnableEvents = False
Application.Calculation = xlCalculationManual
Application.DisplayAlerts = False
On Error Resume Next
Set xObjFD = Application.FileDialog(msoFileDialogFolderPicker)
xObjFD.AllowMultiSelect = False
xObjFD.Title = "Kutools for Excel - Select a folder which contains Excel files"
If xObjFD.Show <> -1 Then Exit Sub
xStrEFPath = xObjFD.SelectedItems(1) & "\"
Set xObjSFD = Application.FileDialog(msoFileDialogFolderPicker)
xObjSFD.AllowMultiSelect = False
xObjSFD.Title = "Kutools for Excel - Select a folder to locate CSV files"
If xObjSFD.Show <> -1 Then Exit Sub
xStrSPath = xObjSFD.SelectedItems(1) & "\"
xStrEFFile = Dir(xStrEFPath & "*.xls*")
Do While xStrEFFile <> ""
xS = xStrEFPath & xStrEFFile
Set xObjWB = Application.Workbooks.Open(xS)
xStrCSVFName = xStrSPath & Left(xStrEFFile, InStr(1, xStrEFFile, ".") - 1) & ".csv"
xObjWB.SaveAs Filename:=xStrCSVFName, FileFormat:=xlCSV
xObjWB.Close savechanges:=False
xStrEFFile = Dir
Loop
Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub 4. Premi il tasto F5, quindi seleziona la cartella che contiene i file di Excel da convertire in file CSV nella prima finestra di dialogo visualizzata.
5. Fai clic su OK, quindi, nella seconda finestra di dialogo visualizzata, seleziona la cartella in cui salvare i file CSV.
6. Fai clic su OK: i file di Excel presenti nella cartella sono stati convertiti in file CSV e salvati in un'altra cartella.
Converti i fogli di una cartella di lavoro in file CSV separati con Kutools per Excel
Come noto, con la funzione «Salva con nome» di Excel è possibile convertire l'intera cartella di lavoro in un unico file CSV. A volte, tuttavia, potrebbe essere necessario convertire singoli fogli in file CSV. In questi casi, l’utilità Dividi documento di Kutools per Excel può esserti d’aiuto.
1. Apri la cartella di lavoro i cui fogli desideri convertire in file CSV separati, quindi fai clic su KUTOOLS PLUS > Cartella di lavoro > Dividi documento.
2. Nella finestra di dialogo Dividi documento, seleziona i fogli da dividere (tutti i fogli sono selezionati per impostazione predefinita), spunta l'opzione Salva come, quindi scegli CSV (*.csv) dal menu a discesa.
3. Fai clic su Dividi per aprire la finestra di dialogo Sfoglia cartelle, quindi seleziona o crea una cartella in cui salvare i file CSV.
4. Fai clic su OK e la cartella di lavoro verrà suddivisa in file CSV separati.
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
Demo: Dividi documento utilizzando Kutools per Excel
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