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
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é