Mails als PDF o. TXT auf Festplatte speichern

[Bernie]

Hallo Renè,
erst einmal ♥ lichen Dank für deine Bemühungen :28:

Renè schrieb:

Das übersteigt meine Möglichkeiten. Wie man Bilder in PDF umwandelt ist mir nicht bekannt. Es gibt auch zuviele Programme für die einzelnen Dateitypen.

 
Ich merke, ich habe mich falsch ausgedrückt. Ich hatte deinen Code so verstanden, dass alle Dateianhänge, egal welches Format, als Bilder abgespeichert werden, oder habe ich es falsch verstanden?

Ich meinte, egal welches Format der Mailanhang hat, ob Bild, PDF, Doc, XLS oder welches auch immer, es sollte der Anhang so gespeichert werden, wie er ist.

[mumpel]

   If intAnlagen > 0 Then
      If MsgBox("Möchten Sie die Anhänge separat speichern?", vbYesNo + vbQuestion, "Frage") = vbYes Then
         For i = 1 To intAnlagen
            SaveInAsFile = .Attachments.Item(i).Filename
            .Attachments.Item(i).SaveAsFile sPDFPath & "\" & SaveInAsFile
         Next i
      End If
   End If

VBA/HTML-CodeConverter, AddIn für Office 2002-2016 - in VBA geschrieben von Lukas Mosimann. Projektbetreuung:RMH Software & Media
Code erstellt und getestet in Office 16 - mit VBAHTML 12.6.0

[Bernie]

Hallo Renè,

hab jetzt mehrere Tests gemacht und Makro an meine Bedürfnisse angepasst, perfekt!

lichen Dank für deine Bemühungen, du hast EINEN gut bei mir.