PDFvrturen zonder op te slaan

[Roma]

Beste,

Ik wil een PDF werkblad in Excel versturen zonder dat het eerst word opgeslagen.
Ik kan het op het forum helaas niet vinden.
wie kan mij hierbij helpen.
Alvast bedankt

 

[edmoor]

Je wil denk ik een Excel werkblad als PDF versturen? Dat kan alleen door het eerst op te slaan. Dat kan wel via VBA waarna die PDF dan ook automatisch weer wordt verwijderd.

 

[HSV]

Een mogelijkheid:

Sla het eerst op in 'Environ("temp")'.
Daarna verwijderen met 'Kill'.

Sub hsv()
Sheets(1).ExportAsFixedFormat 0, Environ("temp") & "\" & Date & ".pdf"
With CreateObject("Outlook.Application").CreateItem(0)
        .To = "[EMAIL="mailadres@gmail.com"]mailadres@gmail.com[/EMAIL]"
        .Subject = "Zomaar iets"
        .Body = "Geachte heer/mevrouw,"  'aanhef
        .Attachments.Add Environ("temp") & "\" & Date & ".pdf"
        .Display 'or send
       End With
 Kill Environ("temp") & "\" & Date & ".pdf"
End Sub

 

[edmoor]

Zeg ik

 

[HSV]

Wat kan ik snel lezen en code schrijven he.

 

[edmoor]

Amazing!

 

[Roma]

Harry bedankt het werkt super.
Zet vraag als opgelost