• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

afdrukgebied opslaan als pdf met naam van inhoud cel

Status
Niet open voor verdere reacties.

NickyVerlinden

Gebruiker
Lid geworden
5 sep 2017
Berichten
7
ik wil via een macro een afdrukgebed opslaan op een bepaalde plaats op "one drive", de naam van het bestand is de inhoud van cel A10.pdf
 
Zonder dat je een voorbeeld document hebt geplaatst, zoiets:
Code:
Sub MaakPDF()
    ActiveSheet.PageSetup.PrintArea = ActiveSheet.UsedRange
    Set rng = ActiveSheet.UsedRange
    Bestand = Environ("userprofile") & "\OneDrive\" & Range("A10") & ".pdf"
    rng.ExportAsFixedFormat Type:=xlTypePDF, _
        fileName:=Bestand, _
        Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, _
        OpenAfterPublish:=True
End Sub
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan