Hi!
Ich möchte vor dem Senden einer Mail den Inhalt der Mail als PDF speichern.
„Vor dem Senden einer Mail“ ist natürlich kein Problem.
„PDF erstellen“ aber sehr wohl. 
Ich habe jetzt wirklich schon sehr, sehr viel gegoogelt, aber nix passendes gefunden (wobei die meisten Beiträge auch schon älter sind.
Hat da vielleicht jemand einen Ansatz für Outlook 2007 oder 2010?
Danke schon mal!
Hi,
ungetestet und auf die schnelle, ein Ansatz:
Dim objOutlook As Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Dim objOutlookRecip As Outlook.Recipient
Dim objOutlookAttach As Outlook.Attachment
Dim xlapp As Object
Dim bRet As Boolean
Dim sPfad As String
dim sText As String
Dim sBetreff As String
Dim sAn As String
’ PDF-Datei erzeugen
sPfad = „C:\Daten\BerichtPDF.pdf“
bRet = ConvertReportToPDF(„Berichtname“, vbNullString _
, sPfad, False, False, 0, „“, „“, 0, 0)
’ Als Outlookmail verschicken
’ Mail erstellen
Set objOutlook = CreateObject(„Outlook.Application“)
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
With objOutlookMsg
.display
.To = sAn
.Subject = sBetreff
.body = sText
.Attachments.Add sPfad, 1, 1
.Send
End With
Set objOutlook = Nothing
LG
Hallo Lars,
Ich habe jetzt wirklich schon sehr, sehr viel gegoogelt, aber
nix passendes gefunden (wobei die meisten Beiträge auch schon
älter sind.
*hmmh* das bedeutet daß hier:
https://www.google.de/#hl=de&sclient=psy-ab&q=outloo…
nix dabei ist, *grübel*
Biste sicher?
Gruß
Reinhard