Sending a workbook with VBA in Microsoft Excel

The SendMail () method is used to easily send a workbook as an attachment to an e-mail.
A first example:

Sub EinfachesSenden1()
ThisWorkbook.SendMail "[email protected]", "Test"
End Sub

After calling up the procedure, a dialog box appears automatically for security reasons. Here the user can decide whether he wants to grant or deny permission to access Outlook. This dialog box also appears in many subsequent applications that want to access elements from Outlook.

After the user has given permission, a message with an attachment is placed in the inbox:
Another example:

Sub EinfachesSenden2()
Dim Empf(1 To 2) As String
Empf(1) = "[email protected]"
Empf(2) = "[email protected]"
ThisWorkbook.SendMail Empf, "Test"
End Sub

Zur Erläuterung beider Programme: Die Methode SendMail() hat einen festen und zwei optionale Parameter. Im ersten Parameter wird der Empfänger hinterlegt. Dabei können angegeben werden: eine einzelne String, 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. 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.

The created e-mail including the attachment (this is the active workbook) ends up in the Outlook outbox. Depending on the personal settings in Outlook, it will be sent directly or later.

Was the explanation to "Sending a workbook with VBA in Microsoft Excel"Helpful? Rate now:

Weitere Erklärungen zu Skriptsprachen