Items.ItemRemove-Ereignis (Outlook)

Tritt ein, wenn ein Element aus der angegebenen Auflistung gelöscht wird.

Syntax

Ausdruck. ItemRemove

Ausdruck Eine Variable, die ein Items-Objekt darstellt.

HinwBemerkungeneise

Dieses Ereignis wird nicht ausgeführt, wenn das letzte Element in einer Persönliche Ordner-Datei (PST) gelöscht wird oder wenn 16 oder mehr Elemente gleichzeitig aus einer PST-Datei, einem Microsoft Exchange-Postfach oder einem öffentlichen Exchange-Ordner entfernt werden. Dieses Ereignis ist in Microsoft Visual Basic Scripting Edition (VBScript) nicht verfügbar.

Beispiel

In diesem Beispiel für Microsoft Visual Basic für Applikationen (VBA) wird optional eine Benachrichtigung an eine Arbeitsgruppe gesendet, wenn ein Benutzer einen Kontakt aus dem Standardordner Kontakte entfernt. Der Beispielcode muss sich in einem Klassenmodul befinden, und die Initialize_handler-Routine muss aufgerufen werden, bevor die Ereignisprozedur von Microsoft Outlook aufgerufen werden kann.

Public WithEvents myOlItems As Outlook.Items 
 
 
 
Public Sub Initialize_handler() 
 
 Set myOlItems = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderContacts).Items 
 
End Sub 
 
 
 
Private Sub myOlItems_ItemRemove() 
 
 Dim myOlMItem As Outlook.MailItem 
 
 If MsgBox("Do you want to notify the Sales Team?", vbYesNo + vbQuestion) = vbYes Then 
 
 Set myOlMItem = Application.CreateItem(olMailItem) 
 
 myOlMItem.To = "Sales Team" 
 
 myOlMItem.Subject = "Remove Contact" 
 
 myOlMItem.Body = "Remove the following contact from your list:" 
 
 myOlMItem.Display 
 
 End If 
 
End Sub

Siehe auch

Items-Objekt

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.