In Microsoft Excel, è possibile convertire facilmente una cartella di lavoro in formato CSV per la scelta di 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 possono contenere un solo foglio. Per convertire più fogli in formato CSV, è necessario esportare uno per uno. Ciò 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, l'uso delle macro.

istruzione

1 Avviare Microsoft Excel e aprire la cartella di lavoro.

2 Premere il tasto "ALT + F8" per aprire la finestra Macro. Tipo "ExportSheetsToCSV" nella casella Nome Macro e quindi cliccare su "Crea".

3 Immettere il seguente codice nell'editor di VBA. Questa macro creerà i file CSV nella stessa cartella come la cartella di lavoro utilizzando i nomi dei fogli per i nomi di file.

Sub ExportSheetsToCSV ()

Dim wSheet Come foglio di lavoro

Dim csvfile As String

Per ogni wSheet nei fogli di lavoro

On Error Resume Next

wSheet.Copy

csvfile = CurDir & "\" & wSheet.Name & ".csv"

ActiveWorkbook.SaveAs Nome file: = csvfile, _

FileFormat: = xlCSV, CreateBackup: = False

ActiveWorkbook.Saved = True

ActiveWorkbook.Close

Successivo wSheet

End Sub

4 Chiudere la modifica di VBA per tornare alla cartella di lavoro.

5 Premere il tasto "ALT + F8" per aprire la finestra Macro. Selezionare "ExportSheetsToCSV" dall'elenco e fare clic su "Esegui". Attendere per Excel per terminare la conversione dei fogli.

Consigli e avvertenze

• Se si desidera salvare i file CSV in una cartella diversa, sostituire "CurDir" in linea 9 con il percorso della cartella preferita. È inoltre possibile spostare la cartella di lavoro nella cartella preferita prima di eseguire la macro.
• Per impostazione predefinita, le macro sono disattivate per Microsoft Excel. Per consentire loro, fare clic sul pulsante Microsoft Office, andare su "Opzioni di Excel" e quindi fare in modo che "Mostra scheda Sviluppo sulla barra multifunzione" sia selezionata. Fai clic su "OK". In alcuni casi, potrebbe essere necessario riavviare MS Excel per le modifiche abbiano effetto.