In Microsoft Excel , kunt u gemakkelijk een werkmap converteren naar CSV door het kiezen van een geschikte type bestand in de " Opslaan als" dialoogvenster . Met behulp van deze methode , zal alleen het actieve werkblad worden omgezet . Dit komt omdat CSV- bestanden maar een vel kunnen bevatten . Om meerdere bladen te zetten in CSV , moet u ze een voor een te exporteren . Het gaat om het activeren van elk vel , het naar een lege werkmap te verplaatsen en vervolgens op te slaan als een CSV-bestand . Om deze taak gemakkelijker en handiger te maken, gebruik macro's . Instructies Start Microsoft Excel en open uw werkmap 1 . Kopen van 2 Druk op " ALT + F8 " om het venster Macro's te openen . Type " ExportSheetsToCSV " in het vak Macro en klik vervolgens op "Create . " 3 Voer de volgende code in de VBA- editor . Deze macro zal de CSV-bestanden Sub ExportSheetsToCSV ( ) Dim wSheet als Aantekenvel Dim csvFile Zoals creëren in dezelfde map als uw werkmap met behulp sheet namen voor bestandsnamen . String voor Elke wSheet In Werkbladen On Error Resume Next wSheet.Copy csvFile = CurDir & " \\ " & wSheet.Name & " . csv " ActiveWorkbook.SaveAs Filename : = csvFile , _ FileFormat : = xlCSV , CreateBackup : = False ActiveWorkbook.Saved = True ActiveWorkbook.Close Volgende wSheet End Sub 4 Sluit de VBA bewerken om terug te gaan naar uw werkmap . 5 Druk op ' ALT + F8 " weer aan het venster Macro's te openen . Selecteer " ExportSheetsToCSV " uit de lijst en klik vervolgens op "Uitvoeren . " Wacht tot Excel tot finish het omzetten van de bladen .
|