Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Mails als PDF o. TXT auf Festplatte speichern
#11
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.
Grüße aus Bremen
Bernie

"Wenn du jemanden triffst ohne lächeln, schenke ihm deins !!!"

MS Office 2016 Pro  32bit - Win 10 Pro 64 bit
Haftungshinweis: Trotz sorgfältiger inhaltlicher Kontrolle übernehmen ich keine Haftung für die Inhalte externer Links. Für den Inhalt der verlinkten Seiten sind ausschließlich deren Betreiber verantwortlich.
Antworten Top
#12
   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

Antworten Top
#13
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.
Grüße aus Bremen
Bernie

"Wenn du jemanden triffst ohne lächeln, schenke ihm deins !!!"

MS Office 2016 Pro  32bit - Win 10 Pro 64 bit
Haftungshinweis: Trotz sorgfältiger inhaltlicher Kontrolle übernehmen ich keine Haftung für die Inhalte externer Links. Für den Inhalt der verlinkten Seiten sind ausschließlich deren Betreiber verantwortlich.
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste