Explorer. BeforeItemPaste-Ereignis (Outlook)
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. |
Hinweise
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
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.