Explorer.BeforeItemCut-Ereignis (Outlook)

Tritt ein, wenn ein Outlook-Element in einem Ordner ausgeschnitten wird.

Syntax

Ausdruck. BeforeItemCut( _Cancel_ )

Ausdruck Eine Variable, die ein Explorer-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, ist nicht abgeschlossen und das Element wird nicht gelöscht.

HinwBemerkungeneise

Dieses Ereignis kann nach dem Auslösen abgebrochen werden. Wenn das Ereignis abgebrochen wird, wird das Element nicht entfernt werden.

Beispiel

Im folgenden Beispiel für Microsoft Visual Basic für Applikationen (VBA) wird der Benutzer mit einer Warnmeldung benachrichtigt, bevor das Objekt im Ordner ausgeschnitten wird. Wenn der Benutzer auf Yes klickt, wird das Objekt im Ordner ausgeschnitten. Wenn der Benutzer auf No klickt, wird das Objekt nicht aus dem Ordner entfernt. Der Beispielcode muss in einem Klassenmodul wie ThisOutlookSessionplatziert werden, und die Initialize_handler Routine muss aufgerufen werden, bevor die Ereignisprozedur von Microsoft Outlook aufgerufen werden kann.

Public WithEvents myOlExp As Outlook.Explorer 
 
Sub Initialize_Handler() 
Set myOlExp = Application.ActiveExplorer 
End Sub 
 
Private Sub myOlExp_BeforeItemCut(Cancel As Boolean) 
'Prompts the user before cutting an item 
 
 Dim lngAns As Long 
 'Display question to user 
 lngAns = MsgBox("Are you sure you want to cut the item?", vbYesNo) 
 'Set cancel argument based on user's answer 
 If lngAns = vbYes Then 
 Cancel = False 
 ElseIf lngAns = vbNo Then 
 Cancel = True 
 End If 
 
End Sub

Siehe auch

Explorer-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.