Explorer.BeforeItemPaste-Ereignis (Outlook)

Artikel
04/07/2023

Tritt ein, wenn ein Outlook-Element eingefügt wird.

Syntax

Ausdruck. BeforeItemPaste( _ClipboardContent_ , _Target_ , _Cancel_ )

Ausdruck Eine Variable, die ein Explorer-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
ClipboardContent	Erforderlich	Variant	Der einzufügende Inhalt.
Target	Erforderlich	Folder	Das Ziel des Einfügevorgangs.
Cancel	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.

Beispiel

Im folgenden Beispiel für Microsoft Visual Basic für Applikationen (VBA) wird der Benutzer benachrichtigt, bevor der Inhalt der Zwischenablage am angegebenen Ziel eingefügt wird. Wenn der Benutzer auf Yes klickt, wird der aktuelle Inhalt in der Zwischenablage am angegebenen Zielort eingefügt. Der Beispielcode muss in einem Klassenmodul wie ThisOutlookSessionplatziert werden, und die Initialize_handler Routine muss aufgerufen werden, bevor die Ereignisprozedur von Outlook aufgerufen werden kann.

Public WithEvents myOlExp As Outlook.Explorer 
 
 
 
Sub Initialize_Handler() 
 
 Set myOlExp = Application.ActiveExplorer 
 
End Sub 
 
 
 
Private Sub myOlExp_BeforeItemPaste(ClipboardContent As Variant, ByVal Target As Folder, Cancel As Boolean) 
 
 Dim lngAns As Integer 'users' answer 
 
 'Prompt user about paste 
 
 lngAns = MsgBox("Are you sure you want to paste the contents of the clipboard into the " _ 
 
 & Target.Name & "?", vbYesNo) 
 
 If 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.

Share via