Microsoft Office Tutorials and References
In Depth Information
9.4.2 Einfaches Versenden einer Arbeitsmappe
Nachdem der Benutzer die Erlaubnis erteilt hat, wird eine Nachricht mit
Anhang ins Postausgangsfach gelegt:
Postausgang
Abbildung 9.26
Nachricht per SendMail()
Ein weiteres Beispiel:
Sub EinfachesSenden2()
Dim Empf(1 To 2) As String
Empf(1) = "max.muster@mailziel.de"
Empf(2) = "monika.muster@mailziel.de"
ThisWorkbook.SendMail Empf, "Test"
End Sub
Das Ergebnis:
Abbildung 9.27
Nachricht an zwei Empfänger
Zur Erläuterung beider Programme:
Die Methode SendMail() hat einen festen und zwei optionale Para-
meter.
SendMail()
Im ersten Parameter wird der Empfänger hinterlegt. Dabei können
angegeben werden:
Empfänger
eine einzelne Zeichenkette, falls es nur einen Empfänger gibt
ein Datenfeld von Zeichenketten, falls es mehrere Empfänger gibt
Im zweiten Parameter kann ein Betreff genannt werden.
Betreff
Falls Sie als dritten Parameter den Wert True angeben, wird eine
Empfangsbestätigung angefordert. Dies hängt natürlich davon ab, ob
das E-Mail-Programm des Empfängers diese Anforderung verarbeiten
kann.
Empfangs-
bestätigung
Search JabSto ::




Custom Search