Clever-Excel-Forum

Clever-Excel-Forum > Office-Anwendungen > Outlook > Mails als PDF o. TXT auf Festplatte speichern
Normale Version: Mails als PDF o. TXT auf Festplatte speichern
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Seiten: 1 2

Bernie

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

Renè schrieb:

Zitat: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

13.03.2018, 19:25
   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

14.03.2018, 16:18
Hallo Renè,

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

Heart lichen Dank für deine Bemühungen, du hast EINEN gut bei mir.
Seiten: 1 2
Clever-Excel-Forum > Office-Anwendungen > Outlook > Mails als PDF o. TXT auf Festplatte speichern