Via een macro document als PDF + naam opslaan

[djpeterl1]

Hallo,

Is het mogelijk in excel om dmv een macro een document automatisch op te laten slaan als een PDF in een bepaalde map (bijv. E:\facturen) en deze automatisch de naam te geven van cel F20?

Groetjes van,

Peter

ps. heb cutePDF (opslaan/afdrukken als PDF gaat handmatig goed)

 

[Gert Bouwmeeste]

Kijk even hier voor een oplossing met PDFCreator

 

[Roncancio]

Sub OpslaanAlsPDF()
ActiveWorkbook.SaveAs "E:\facturen\" & Range("F20").Value & ".pdf"
End Sub

Met vriendelijke groet,


Roncancio

 

[Gert Bouwmeeste]

@Roncancio

Bedoelt TS niet het printen naar PDF in plaats van Opslaan als ...? In Excel 2003 kan ik dit zo niet terug vinden.

 

[Roncancio]

@Roncancio

Bedoelt TS niet het printen naar PDF in plaats van Opslaan als ...? In Excel 2003 kan ik dit zo niet terug vinden.

TS heeft het over "op te laten slaan".
Ik zie nergens printen staan.

Met vriendelijke groet,


Roncancio

 

[wiki]

In deze thread wordt de oplossing behandeld.

http://www.helpmij.nl/forum/showthread.php?t=410917

gr Wim

 

[Gert Bouwmeeste]

In deze thread wordt de oplossing behandeld.

http://www.helpmij.nl/forum/showthread.php?t=410917

Dit is de uitwerking van de link die ik in #2 heb gegeven.

 

[wiki]

Sorry

gr wim

 

[Gert Bouwmeeste]

Sorry

Wim, dat bedoelde ik niet, ik was wat te snel in het verzenden van mijn commentaar. Ik bedoelde er meer mee dat jouw voorbeeld de uitwerking is van de link die ik gaf, m.a.w. dat dat wellicht wat meer duidelijkheid biedt.

Ik kan nl vanaf de werkplek hier eenmaal gegeven antwoorden niet meer bewerken.

 

[djpeterl1]

de bovenste oplossing gaf voor mij geen oplossing...

ActiveWorkbook.SaveAs "E:\facturen\" & Range("F20").Value & ".pdf"

Document word netjes opgeslagen op de aangegeven locatie, de naam is goed en de extensie is goed (PDF).
Alleen is het geen PDF document, of te wel... het is een excel document opgeslagen met een PDF extensie.

Of doe ik iets verkeerd???

Gr. van Peter

ps. is het ook mogelijk dat alleen het afdruk bereik van het actieve blad word opgeslagen en niet de hele map??

 

[Roncancio]

de bovenste oplossing gaf voor mij geen oplossing...

ActiveWorkbook.SaveAs "E:\facturen\" & Range("F20").Value & ".pdf"

Document word netjes opgeslagen op de aangegeven locatie, de naam is goed en de extensie is goed (PDF).
Alleen is het geen PDF document, of te wel... het is een excel document opgeslagen met een PDF extensie.

Of doe ik iets verkeerd???

Gr. van Peter

ps. is het ook mogelijk dat alleen het afdruk bereik van het actieve blad word opgeslagen en niet de hele map??

Je hebt het goed gedaan. Ik heb een fout gemaakt.
Je kunt je beter richten op wat Gert Bouwmeester en Wiki hebben gestuurd.

Met vriendelijke groet,


Roncancio

 

[wiki]

Probeer de bijlage van noord 25 in mijn verwijzing #6 eens. Als deze niet werkt ligt het aan je PDF creator.

 

[djpeterl1]

miss handig om op het andere topic verder te gaan

http://www.helpmij.nl/forum/showthread.php?t=410917