Datei per Email versenden /Firefox

Bild

Betrifft: Datei per Email versenden /Firefox
von: Martina
Geschrieben am: 02.08.2015 00:29:04

Hallo Experten,
Hat jemand eine Ahnung, wie ich eine Excel-Datei per Makro mit Firefox versende?
Bzw. mit dem Mailprogramm (komme grad nicht auf den Namen).
Ich kenne nur Beschreibungen per Outlook.
???
Martina

Bild

Betrifft: AW: Datei per Email versenden /Firefox
von: mumpel
Geschrieben am: 02.08.2015 11:09:15
Hallo!
Eventuell musst Du noch den Pfad zu Thunderbird anpassen.

Sub EmailWithThunderbird()

  Dim strAttach  As String
  Dim strBody    As String
  Dim strSubject As String
  Dim strTo      As String
  Dim strCom     As String
  
  ActiveWorkbook.Save
  
  strAttach = ActiveWorkbook.FullName
  
  strBody = "Hallo!" & vbCrLf & vbCrLf & "Anbei gewünschte Unterlagen." & _
            vbCrLf & vbCrLf & "Gruß, Max"
               
  strSubject = "Ihre Unterlagen"
  
  strTo = Range("A1").Value
  
strCom = "C:\Program Files (x86)\Mozilla Thunderbird\Thunderbird.exe " & _
         "-compose to='" & strTo & "',subject='" & strSubject & "',body='" _
         & strBody & "',attachment='file:///" & strAttach & "'"

Shell strCom, vbMaximizedFocus

End Sub

VBA/HTML - CodeConverter für Office-Foren, AddIn für Office 2002-2013 - in VBA geschrieben von Lukas Mosimann. Projektbetreuung:mumpel

Code erstellt und getestet in Office 15 - mit VBAHTML 12.6.0

Gruß, René

Bild

Betrifft: AW: Datei per Email versenden /Firefox
von: Martina
Geschrieben am: 03.08.2015 11:10:59
HAllo René,
whow, werde das mal testen und melde mich zurück, dauert jedoch etwas, weil ich momentan nicht an den Rechner kann.
Herzlichen Dank!!
Martina

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Datei per Email versenden /Firefox"