I Microsoft Excel , kan du enkelt konvertere en arbeidsbok til CSV ved å velge en passende filtype i "Lagre som"-dialogboksen . Ved hjelp av denne metoden, vil bare det aktive arket skal konverteres. Dette er fordi CSV-filer kan bare inneholde ett ark . Å konvertere flere ark i CSV, må du eksportere dem én etter én. Dette innebærer aktivering hvert ark , flytte den til en tom arbeidsbok og deretter lagre den som en CSV -fil . For å gjøre denne oppgaven enklere og mer praktisk , bruke makroer . Instruksjoner
en

Start Microsoft Excel og åpne arbeidsboken .
2

Trykk "Alt + F8 " for å åpne Makroer vinduet. Type " ExportSheetsToCSV " i Makro -boksen , og klikk deretter på " Create ".
3

Skriv inn følgende kode i VBA editor. Denne makroen vil opprette CSV-filer i samme mappe som arbeidsboken ved hjelp av ark navn etter filnavn.

Sub ExportSheetsToCSV ( )

Dim wSheet Som Regneark

Dim csvFile As String

Hver wSheet I Regneark

On Error Resume Next

wSheet.Copy

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

ActiveWorkbook.SaveAs Filnavn : = csvFile , _

FileFormat : = xlCSV , CreateBackup : = False

ActiveWorkbook.Saved = sant

ActiveWorkbook.Close

Neste wSheet

End Sub
4

Lukk VBA edit for å gå tilbake til arbeidsboken.
5

trykk "Alt + F8 " igjen for å åpne Makroer vinduet . Velg " ExportSheetsToCSV " fra listen og klikk deretter på " Run . " Vent til Excel for å avslutte konvertere arkene .