Ich habe Probleme beim Versenden von Outlook-E-Mails mit Excel VBA. Ich habe den Code, um es zu tun -Sendupdate - Und es funktioniert gut, wenn ich das Makro manuell ausführen. Mein zweites MakroStartTimer soll das oben genannte zu einer festgelegten Zeit ausführen, wenn ich nicht an meinem Schreibtisch bin.

Wenn der Computer gesperrt ist, wird die E-Mail jedoch nicht gesendet. Wenn ich an meinen Schreibtisch zurückkomme, hängt dort die E-Mail als Entwurf, und ich muss auf die Schaltfläche klickensend Taste.

Hier ist mein Code:

<code>Sub SendUpdate()
Recipient = "[email protected]"
Subj = "update"
Dim msg As String
msg = "hello”

HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
    Application.Wait (Now + TimeValue("0:00:01"))
    Application.SendKeys "%s"
End Sub

Sub StartTimer()
Application.OnTime TimeValue("18:00:00"), "SendUpdate"

End Sub
</code>

Gibt es eine Möglichkeit, das Makro zu codieren, um sicherzustellen, dass die E-Mail gesendet wird?