Tabbladen opslaan als PDF

Een Excel file is handig maar als je dit uiteindelijk wilt doorsturen is een PDF bestand iets netter. Nu heeft Excel een handige optie ingebouwd waarmee je een tabblad kan opslaan als PDF bestand of je kan de macro gebruiken voor het opslaan als PDF, opgelost zou je zeggen.

Maar wat nu als je een bestand hebt met heel veel tabbladen die je allemaal in wilt opslaan als PDF? Dan mag je genoeg tijd vrijmaken want dat is erg veel werk. Heel toevallig vertel ik jullie in dit artikel hoe je dat met een macro kan doen. Dit scheelt erg veel tijd.
Als je nog niet weet hoe je een macro toevoegt, dan kan je hier kijken.

Vooraf is het handig om te weten hoe je het Ontwikkelaars tabblad krijgt en hoe je een macro toevoegt.

 

Video

 

Tabbladen opslaan als PDF

Om deze optie goed te maken, gaan we eerst een code toevoegen. Open de VBA editor, sneltoets ALT + F11, en maak daar een nieuwe Module aan. Plak daar de volgende code:

Sub PDF()
Pad = "C:\Users\Nick\Desktop\test\"
For Each sh In ThisWorkbook.Sheets
If sh.Name <> "Voorblad" Then
If Dir(Pad & sh.Name & ".pdf") <> "" Then
MsgBox "Het bestand: " & sh.Name & ".pdf bestaat reeds"
Else
sh.ExportAsFixedFormat 0, Pad & sh.Name, , , , , OpenAfterPublish:=False
End If
End If
Next sh
End Sub

Vervolgens gaan we hier een ActiveX besturingselement voor aanmaken. Ga op het lint naar het tabblad Ontwikkelaars, selecteer hier Invoegen en kies voor knop.
Koppel hier de zojuist aangemaakte module TabbladPDF aan.

Deze macro slaat elk tabblad op behalve als bladen waar F8 leeg is en tabblad met de naam Voorblad. Alle bestanden die worden opgeslagen krijgen de naam die het werkblad heeft.
Wel moet je voor dat je deze macro gebruikt het pad nog wijzigen, dit geeft aan waar de bestanden opgeslagen worden.

Hopelijk bespaart je dit veel werk!

 

 

 

 

 

Nieuwsbrief

Als deze uitleg nuttig was, dan kan je je inschrijven voor onze nieuwsbrief.
Een keer per maand ontvang je de nieuwste berichten in je mailbox.
Klik hier om je in te schrijven.
Je kan ons ook volgen op Facebook en Twitter.

Dit vind je misschien ook leuk...

Geef een reactie

Het e-mailadres wordt niet gepubliceerd. Vereiste velden zijn gemarkeerd met *

Spring naar toolbar