Tip: andere talen zijn Google-Vertaald. Je kunt het English versie van deze link.
Log in
x
or
x
x
Registreren
x

or

Hoe kan ik elk blad opslaan of exporteren als CSV / PDF-bestand in Excel?

U hebt bijvoorbeeld een grote werkmap met meerdere bladen en u wilt elk vel opslaan of exporteren als een afzonderlijk .csv-bestand of PDF-bestand, hoe u dit gemakkelijk en snel kunt doen? In dit artikel zal ik verschillende methoden introduceren om het op te lossen.

Sla elk vel op of exporteer het als CSV / PDF-bestand met de functie Opslaan als

Batch opslaan of exporteren van elk blad als CSV-bestand met VBA

Batch opslaan of exporteren van elk blad als CSV / PDF-bestand met Kutools voor Excel

Batch converteer meerdere Excel-bestanden naar PDF in Excel

Tabblad Office Schakel bewerken en browsen met tabbladen in Office in en maak uw werk veel eenvoudiger ...
Kutools voor Excel brengt 300 geavanceerde functies naar Excel en verhoogt uw productiviteit met 80%
  • Auto-tekst: Maak uw favoriete grafieken, afbeeldingen, cellen, complexe formules en hergebruiken ze snel in de toekomst.
  • Meer dan 20-tekstfuncties: Nummer uit tekststring halen; Een deel van de tekst extraheren of verwijderen; Nummers en valuta's omzetten in Engelse woorden ...
  • Tools samenvoegen: Meerdere werkmappen en bladen in één; Meerdere cellen / rijen / kolommen samenvoegen en gegevens bewaren; Dubbele rijen en som samenvoegen ...
  • Split gereedschap: Gegevens splitsen in meerdere bladen op basis van waarde; Eén werkmap naar meerdere Excel-, PDF- of CSV-bestanden; Eén kolom naar meerdere kolommen ...
  • Plakken overslaan Verborgen / gefilterde rijen; Tel en som op achtergrondkleur; Maak een verzendlijst en Verzend e-mails op waarde van Cell...
  • Super filter: Maak geavanceerde filterschema's en pas deze toe op alle bladen; Soort per week, dag, frequentie en meer; filters door vetgedrukt, formules, commentaar ...
  • Meer dan 300 krachtige functies; Werkt met Office 2007-2019 en 365; Ondersteunt alle talen; Eenvoudig inzetbaar in bedrijf; Volledige functionaliteit 60-daagse gratis proefversie.

Zoals u weet, kan Microsoft Excel het huidige werkblad opslaan als een afzonderlijk CSV- of PDF-bestand. Daarom kunt u elk vel als .csv-bestand of PDF-bestand één voor één opslaan of exporteren.

1. Schakel over naar het blad dat u wilt opslaan of exporteren als een afzonderlijk CSV-bestand en klik op filet (of Office-knop)> Opslaan als.

2. Specificeer in het openingsdialoogvenster de doelmap waarin u het .csv-bestand wilt opslaan, klik op Opslaan als type vak en selecteer CSV (door komma's gescheiden) (* .csv) or PDF (* .pdf) uit de vervolgkeuzelijst en klik op de Bespaar knop.

3. Er zullen achtereenvolgens twee waarschuwingsdialoogvensters verschijnen. Klik alstublieft OK > Ja.

Let op: Als u een actief werkblad opslaat als PDF-bestand, verschijnen deze dialoogvensters niet. Ga gewoon door naar de volgende stap.

4. Herhaal bovenstaande stap 1-3 om andere bladen afzonderlijk als .csv-bestanden op te slaan.


Als er een aantal vellen zijn die u wilt opslaan of exporteren als CSV-bestanden, zal de eerste methode behoorlijk tijdrovend en vervelend zijn. Deze VBA kan het werken vereenvoudigen en het gemakkelijk maken om elk blad als CSV-bestand op te slaan of te exporteren.

1. druk op anders + F11 toetsen tegelijkertijd om het venster Microsoft Visual Basic for Application te openen.

2. klikken bijvoegsel > moduleen plak vervolgens de volgende VBA-code in het nieuwe modulevenster.

VBA: sla elk blad op als een afzonderlijk CSV-bestand

Public Sub SaveWorksheetsAsCsv()
Dim xWs As Worksheet
Dim xDir As String
Dim folder As FileDialog
Set folder = Application.FileDialog(msoFileDialogFolderPicker)
If folder.Show <> -1 Then Exit Sub
xDir = folder.SelectedItems(1)
For Each xWs In Application.ActiveWorkbook.Worksheets
xWs.SaveAs xDir & "\" & xWs.Name, xlCSV
Next
End Sub
3. Klik op het lopen knop of druk op F5 sleutel om deze VBA uit te voeren.

4. Geef in het dialoogvenster Openen de doelmap op waar u alle .csv-bestanden in wilt opslaan en klik op de OK knop.

Vervolgens ziet u dat elk blad wordt opgeslagen als een afzonderlijk CSV-bestand in de opgegeven doelmap.


Sommige Excel-gebruikers weigeren om bepaalde redenen VBA-code. Maak je geen zorgen! De derde methode kan elk blad ook batch-opslaan of exporteren als .csv-bestand of PDF-bestand door de Werkboek splitsen utility van Kutools voor Excel.

1. Klik op het Enterprise > werkboek > Werkboek splitsen.

documenteer elk blad in csv 2

2. In het dialoogvenster Opening werkmap splitsen,

documenteer elk blad in csv 8

(1) Blijf alle bladen selecteren. Als dat niet het geval is, kunt u het selectievakje aanvinken Werkblad naam om alle bladen te selecteren;

(2) Controleer de Geef het opslagformaat op keuze;

(3) Klik op het vak hieronder Geef het opslagformaat op optie en selecteer CSV (Macintosh) (*. Csv) or PDF (* .pdf) uit de keuzelijst.

(4) Klik op de spleet knop.

Notes: Als er verborgen en lege werkbladen in uw werkmap aanwezig zijn, controleert u de Sla verborgen werkbladen over doos en de Sla leeg werkblad over box negeert alle blanco of verborgen bladen tijdens het exporteren.

Kutools for Excel - Bevat meer dan 300 handige tools voor Excel. Gratis proefversie 60-dag, geen creditcard vereist! Snap het nu

3. Geef in het dialoogvenster Bladeren naar map de doelmap op waarin u alle CSV- of PDF-bestanden wilt opslaan en klik op OK knop.

Nu ziet u dat elk blad wordt geëxporteerd en opgeslagen als een afzonderlijk CSV-bestand in de opgegeven map.


In deze video, Kutools en Kutools Plus tabbladen worden toegevoegd door Kutools for Excel. Klik indien nodig op voor 60-daagse gratis proef zonder beperking!

Kutools voor Excel - De beste Office-productiviteitstool Verhoog uw productiviteit met 80%

  • Super Formula Bar (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken op gefilterd bereik...
  • Cellen / rijen / kolommen samenvoegen en gegevens bewaren; Inhoud gesplitste cellen; Combineer dubbele rijen en som / gemiddelde... voorkomen dubbele cellen; Ranges vergelijken...
  • Selecteer Dupliceren of Uniek rijen; Selecteer Lege rijen (alle cellen zijn leeg); Super Find en Fuzzy Find in veel werkboeken; Willekeurig selecteren ...
  • Exacte kopie Meerdere cellen zonder formule-referentie te wijzigen; Automatisch referenties maken naar meerdere vellen; Voeg kogels toe, Selectievakjes en meer ...
  • Favoriete en snel formules invoegen, Bereiken, grafieken en afbeeldingen; Coderen van cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • extract Text, Tekst toevoegen, verwijderen op positie, Verwijder de spatie; Subtotalen voor paging maken en afdrukken; Converteren tussen cellen Inhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerde sortering per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Meer dan 300 krachtige functies. Werkt met Office 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in bedrijf. Volledige functionaliteit 60-daagse gratis proefversie.
kte-tab 201905

Tabblad Office Brengt interface met tabbladen naar Office en maakt uw werk veel eenvoudiger

  • Bewerken en lezen met tabbladen inschakelen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en verlaagt dagelijks honderden muisklikken voor u!
Officetab onderaan
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.
    Ken · 1 years ago
    Copied and pasted the VBA script. On pressing F5, the system highlighted the word "sheet" in the first line, and gave the error "Compile error: Expected: end of statement"


    Mmmph.
  • To post as a guest, your comment is unpublished.
    Pav · 2 years ago
    Thank you for your very helpful tips. I used the vba code to convert an excel file with multiple sheets into individual csv files. I'm wondering, how can I specify that i'd like those csv files to be utf-8? Is there an addition to the code below that will add that feature?

    Public Sub SaveWorksheetsAsCsv()
    Dim xWs As Worksheet
    Dim xDir As String
    Dim folder As FileDialog
    Set folder = Application.FileDialog(msoFileDialogFolderPicker)
    If folder.Show -1 Then Exit Sub
    xDir = folder.SelectedItems(1)
    For Each xWs In Application.ActiveWorkbook.Worksheets
    xWs.SaveAs xDir & "\" & xWs.Name, xlCSV
    Next
    End Sub
    • To post as a guest, your comment is unpublished.
      Sriraj · 3 months ago
      ActiveWorkbook.SaveAs Filename:=Replace(Replace(xSPath & xCSVFile & xWs.Name, ".xlsx", "", vbTextCompare), ".xls", "", vbTextCompare) & ".csv", FileFormat:=xlCSVUTF8, CreateBackup:=False