Hallo Leute
Ich möchte in einer Schleife 100 Tabellen an 100 Adressen mailen.
der Code (Auszug):
With Nachricht
.To = "xxx@yyy.de"
.Subject = "Testmeldung von Excel " & Date & Time
.attachments.Add AWS
.Body = "Das ist ein Test." & vbCrLf & "Bitte ignorieren."
.Display 'Mail wird angezeigt
'.Save 'Mail wird als Entwurf gespeichert
'.send 'Mail wird verschickt
End With
Das Problem:
.display funktioniert, aber bei jeder Mail muss Senden angeklickt werden (zur Zeit die beste Lösung)
.send bringt die "Ein Programm versucht eine E-Mail-Nachricht in Ihrem Namen zu senden" Meldung mit Wartebalken. Das kann wegen Grupenrichtlinien nicht übergangen werden: Unbrauchbar (100 x 5 Sekunden).
.save speicher in Entwürfe. Wenn ich dort auf Senden klicke geht die Mail los, kommt aber mit "Diese Nachricht wurde vom E-Mail-System des Empfängers zurückgewiesen. Überprüfen Sie die E-Mail-Adresse des Empfängers" zurück (es ist die gleiche Adresse wir bei .send!).
Optimal wäre .save. Aber warum wird dabei die Mailadresse falsch interpretiert und was ist daran falsch?
Schöne Grüße
Kai