In Microsoft Excel , è possibile convertire facilmente una cartella di lavoro in formato CSV , scegliendo un tipo di file appropriato nella " Salva con nome" finestra di dialogo. Usando questo metodo , solo il foglio attivo verrà convertito . Questo perché i file CSV può contenere un solo foglio . Per convertire più fogli in formato CSV , è necessario esportare una per una . Questo comporta l'attivazione di ogni foglio , spostandolo a una cartella di lavoro vuota e poi salvarlo come file CSV . Per rendere questo compito più facile e più conveniente , utilizzare le macro . Istruzioni
1
Avviare Microsoft Excel e aprire la cartella di lavoro .
2
Comunicati "Alt + F8 " per aprire la finestra Macro. Tipo " ExportSheetsToCSV " nella casella Nome macro e quindi fare clic su "Crea ".
3
Inserisci il seguente codice nell'editor di VBA . Questa macro creerà i file CSV nella stessa cartella della cartella di lavoro utilizzando i nomi dei fogli per i nomi di file .
Sub ExportSheetsToCSV ( ) per
Dim wSheet come manuale
Dim csvfile come String
Per Ogni wSheet in fogli di lavoro
On Error Resume Next
wSheet.Copy
csvfile = CurDir & " \\ " & wSheet.Name & " . csv "
ActiveWorkbook.SaveAs Filename : = csvfile , _
FileFormat : = xlCSV , CreateBackup : = False
ActiveWorkbook.Saved = True
ActiveWorkbook.Close
Avanti wSheet
End Sub
4
Chiudere il VBA di modifica per tornare alla cartella di lavoro .
5
premere "+ F8 ALT " per aprire la finestra delle macro. Selezionare " ExportSheetsToCSV " dall'elenco e fare clic su "Esegui ". Attendere Excel per completare la conversione dei fogli .