Application.ItemSend-Ereignis (Outlook)
Tritt auf, wenn ein Microsoft Outlook-Element vom Benutzer über einen Inspektor gesendet wird (bevor der Inspektor geschlossen wird, aber nachdem der Benutzer auf die Schaltfläche Senden geklickt hat) oder wenn die Send-Methode für ein Outlook-Element, z. B. MailItem, in einem Programm verwendet wird.
Syntax
Ausdruck. ItemSend
( _Item_
, _Cancel_
)
expression Eine Variable, die ein Application-Objekt darstellt.
Parameter
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
Item | Erforderlich | Objekt | Das gesendete Element. |
Cancel | Erforderlich | Boolean | False, wenn das Ereignis auftritt. Falls dieses Argument durch die Ereignisprozedur auf True festlegt wird, wird das Schließen abgebrochen, und die Arbeitsmappe bleibt geöffnet. |
HinwBemerkungeneise
Dieses Ereignis ist in Microsoft Visual Basic Scripting Edition (VBScript) nicht verfügbar.
Beispiel
Das folgende Beispiel für Microsoft Visual Basic for Applications (VBA) zeigt, wie das ItemSend-Ereignis als Reaktion auf Benutzereingaben abgebrochen wird. Der Beispielcode muss in einem Klassenmodul platziert werden, und die Initialize_handler
-Routine muss aufgerufen werden, bevor die Ereignisprozedur von Outlook aufgerufen werden kann.
Public WithEvents myOlApp As Outlook.Application
Public Sub Initialize_handler()
Set myOlApp = Outlook.Application
End Sub
Private Sub myOlApp_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim prompt As String
prompt = "Are you sure you want to send " & Item.Subject & "?"
If MsgBox(prompt, vbYesNo + vbQuestion, "Sample") = vbNo Then
Cancel = True
End If
End Sub
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für