Suggerimento: le altre lingue sono tradotte da Google. Puoi visitare il English versione di questo link.
Connetti
x
or
x
x
Registratevi
x

or

Come convertire in batch più file Excel in file CSV in Excel?

In Excel, possiamo convertire la cartella di lavoro in file CSV con la funzione Salva come, ma sapresti come convertire in batch più file Excel in file CSV separati? In questo articolo, introduco un codice VBA per convertire in batch tutti i file Excel in una cartella in file CSV in Excel.

Batch converte i file Excel di una cartella in file CSV con VBA

Converti fogli di lavoro in file CSV separati con Kutools per Excelbuona idea3

Navigazione a schede e modifica di più cartelle di lavoro Excel / documenti Word come Firefox, Chrome, Internet Esplora 10!

Potrebbe essere familiare visualizzare più pagine Web in Firefox / Chrome / IE e passare da una all'altra facendo clic sulle schede corrispondenti facilmente. Qui, Office Tab supporta l'elaborazione simile, che consente di sfogliare più cartelle di lavoro di Excel o documenti di Word in una finestra di Excel o in una finestra di Word e passare facilmente da una all'altra facendo clic sulle relative schede. Clicca per la prova gratuita di 45-day di Office Tab!

ot Excel

Batch converte i file Excel di una cartella in file CSV con VBA

In Excel, non esiste una funzione incorporata in grado di risolvere questo lavoro rapidamente tranne VBA.

1. Abilita Excel e premi Alt + F11 chiavi aperte Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Modulo creare un nuovo modulo.

3. Copia il codice sottostante e incollali nella nuova finestra del modulo.

VBA: batch converte i file Excel in CSV

Sub WorkbooksSaveAsCsvToFolder () 'UpdatebyExtendoffice20181031 Dim xObjWB As Workbook Dim xObjWS As Foglio di lavoro Dim xStrEFPath As String Dim xStrEFFile As String Dim xObjFD As FileDialog Dim xObjSFD As FileDialog Dim xStrSPath As String Dim xStrCSVFName As String Application.ScreenUpdating = False Application.EnableEvents = False Application. Calcolo = xlCalculationManual On Error Riprendi Next Set xObjFD = Application.FileDialog (msoFileDialogFolderPicker) xObjFD.AllowMultiSelect = False xObjFD.Title = "Kutools per Excel - Seleziona una cartella che contiene file Excel" Se xObjFD.Show <> -1 Quindi Esci Sub xStrEFPath = xObjFD.SelectedItems (1) e "\" Imposta xObjSFD = Application.FileDialog (msoFileDialogFolderPicker) xObjSFD.AllowMultiSelect = False xObjSFD.Title = "Kutools per Excel - Seleziona una cartella per individuare i file CSV" Se xObjSFD.Show <> -1 poi Exit Sub xStrSPath = xObjSFD.SelectedItems (1) & "\" xStrEFFile = Dir (xStrEFPath & "* .xls *") Do While xStrEFFile <> "" Imposta xObjWB = Cartella di lavoro s.Open (Nome file: = xStrEFPath e xStrEFFile) xStrCSVFName = xStrSPath e Left (xStrEFFile, InStr (1, xStrEFFile, ".") - 1) e ".csv" xObjWB.SaveAs Nome file: = xStrCSVFName, FileFormat: = xlCSV xObjWB .Chiudi savechanges: = False xStrEFFile = Dir Loop Application.Calculation = xlCalculationAutomatic Application.EnableEvents = True Application.ScreenUpdating = True End Sub

4. Stampa F5 chiave, selezionare la cartella contiene i file di Excel che si desidera convertire in file CSV nella prima finestra di dialogo.
doc batch in csv 1

5. Clic OK, quindi nella seconda finestra di dialogo popping, selezionare la cartella in cui inserire i file CSV.
doc batch in csv 2

6. Clic OK, ora i file Excel nella cartella sono stati convertiti in file CSV e salvati in un'altra cartella.
doc batch in csv 3


Converti fogli di lavoro in file CSV separati con Kutools per Excel

Come noto, possiamo convertire l'intera cartella di lavoro in un unico file CSV in Excel con la funzione Salva con nome. Ma in alcune volte, vuoi convertire il foglio singolo in un file CSV, in questo caso, il Cartella di lavoro divisa utilità di Kutools for Excel posso aiutarti.

Kutools for Excel, con oltre 200 funzioni a portata di mano, facilita il lavoro.

Dopo l'installazione Kutools per Excel, si prega di fare come di seguito:(Scarica gratis Kutools per Excel ora!)

1. Abilitare la cartella di lavoro che si desidera convertire i fogli come file CSV separati, fare clic su Kutools Plus > Cartella di lavoro > Cartella di lavoro divisa.
doc batch in csv 4

2. Nel Cartella di lavoro divisa dialog, controlla il nome del foglio che vuoi dividere (tutti i fogli sono controllati per impostazione predefinita), controlla Salva con nome digita, scegli CSV (Macintosh) (* .CSV) dall'elenco a discesa.
doc batch in csv 5

3. Clic Diviso per far apparire a Sfoglia per cartella finestra di dialogo, scegliere o creare una cartella per posizionare i file CSV.
doc batch in csv 6

4. Clic OK, ora la cartella di lavoro è stata divisa in file CSV separati.
doc batch in csv 7


Kutools per Excel risolve la maggior parte dei problemi e aumenta la produttività del 80%

  • Riutilizzo: Inserire rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Cifra le celle con password; Crea mailing list e invia email ...
  • Super Formula Bar (modifica facilmente più righe di testo e formula); Layout di lettura (leggere e modificare facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere i dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Previeni celle duplicate; Confronta le gamme...
  • Seleziona Duplica o Unica Righe; Seleziona righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molti libri di esercizi; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento alla formula; Creazione automatica di riferimenti a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • estrarre il testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare subtotali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtro ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale di grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle basate su colonne chiave; Dividi i dati in più fogli; Converti in batch xls, xlsx e PDF...
  • Oltre alle potenti funzionalità di 300. Supporta Office / Excel 2007-2019 e 365. Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzioni complete di prova gratuita di 30-day.
kte tab 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, Editore, accesso, Visio e progetto.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la tua produttività di 50% e riduce centinaia di clic del mouse per te ogni giorno!
fondo officetab
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.
    Sam · 4 months ago
    Another small remark:

    If the cells in the original Excel files are all formatted as "General", some accuracy is lost when the file is saved as a CSV
    For example, if a cell value in Excel is 0.123456789123456, then the value in the CSV will be 0.123456789 (missing the remaining decimals), as long as the cell was formatted as 'General'. This can be solved by formatting all cells in the Excel file to anything else than 'General' (for example, 'Text'). In that case, the CSV *will* still have the full detail/accuracy. I.e. the values in the Excel files will be fully intact after saving as a CSV.

    How could this macro be changes, so it sets the formatting of all cells in the Excel file to 'Text', before saving as a CSV?
    I imagine that it must somehow make use of the following, but I can't figure out how to correctly include in within the macro:

    Cells.Select
    Selection.NumberFormat = "@"
  • To post as a guest, your comment is unpublished.
    Sam · 4 months ago
    Works great, thanks for the code!
    My only remark would be that this code cuts of file names when there is a "." in the filename itself (e.g. file.123.csv turns into file.csv).
  • To post as a guest, your comment is unpublished.
    Aman · 9 months ago
    Ty it really works dear !!