MailItem.BeforeCheckNames-Ereignis (Outlook)
Tritt auf, bevor in Microsoft Outlook mit dem Auflösen von Namen in der Empfängerauflistung für ein Element (bei dem es sich um eine Instanz des übergeordneten Objekts handelt) begonnen wird.
Syntax
Ausdruck.
BeforeCheckNames( _Cancel_ )
Ausdruck Eine Variable, die ein MailItem-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Abbrechen | Erforderlich | Boolean | False, Wenn das Ereignis auftritt. Wenn die Ereignisprozedur dieses Argument auf True festgelegt wird, wird der Vorgang der Lösung nicht abgeschlossen. |
Hinweise
Sie verwenden das BeforeCheckNames-Ereignis in VBScript, aber das Ereignis wird nicht ausgelöst, wenn ein E-Mail-Name im Formular aufgelöst wird.
Das Ereignis wird unter den folgenden Umständen nicht ausgelöst:
Sie haben ein Journaleintragsformular angepasst und anschließend einen Kontakt im Feld Kontakte aufgelöst.
Sie haben ein Kontaktformular angepasst und anschließend einen Kontakt im Feld Kontakte aufgelöst.
Sie haben einen beliebigen Formulartyp angepasst, und Outlook hat den Namen automatisch im Hintergrund aufgelöst.
Sie haben einen Empfänger programmseitig erstellt und aufgelöst.
Beispiel
Visual Basic für Applikationen (VBA) wird gefragt werden, der Benutzer, wenn der Benutzer auflösen möchte nennt und gibt False zurück, um den Vorgang abzubrechen, wenn der Benutzer keine beantwortet. Der Beispielcode muss in einem Klassenmodul wie ThisOutlookSessionplatziert werden, und die SendMail() Prozedur sollte aufgerufen werden, bevor die Ereignisprozedur von Outlook aufgerufen werden kann.
Public WithEvents myItem As Outlook.MailItem
Private Sub myItem_BeforeCheckNames(Cancel As Boolean)
If MsgBox("Do you want to resolve names now?", 4) = vbOK Then
Cancel = True
End If
End Sub
Public Sub SendMail()
Set myItem = Application.CreateItem(olMailItem)
myItem.Recipients.Add ("Dan Wilson")
myItem.Recipients.Add ("Nate Sun")
myItem.Body = "Good morning!"
myItem.Send
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.