I am trying to send emails from a VBA code, and it works sometimes and sometimes not.
My code is as follows: thund = "C:\Program Files (x86)\Mozilla Thunderbird\thunderbird.exe " & _
"-compose " & """" & _ "to='" & email & "'," & _ "attachment='" & Attachment$ & "'," & _ "subject='" & subj & "'," & _ "body='" & fullBody$ & "'" & """" Call Shell(thund, vbNormalFocus) Sleep 3000 AppActivate "thunderbird" SendKeys "^~", True Sleep 3000
SendKeys "^{ENTER}", True Sleep 3000
SendKeys "%fd", True
My code is as follows:
thund = "C:\Program Files (x86)\Mozilla Thunderbird\thunderbird.exe " & _
"-compose " & """" & _
"to='" & email & "'," & _
"attachment='" & Attachment$ & "'," & _
"subject='" & subj & "'," & _
"body='" & fullBody$ & "'" & """"
Call Shell(thund, vbNormalFocus)
Sleep 3000
AppActivate "thunderbird"
SendKeys "^~", True
Sleep 3000
SendKeys "^{ENTER}", True
Sleep 3000
SendKeys "%fd", True