Explorer.BeforeItemPaste Event (Outlook)

Office 2013 and later
GitHub-Mark-64px

Contribute to this content

Use GitHub to suggest and submit changes. See our guidelines for contributing to VBA documentation.

Occurs when an Outlook item is pasted.

expression .BeforeItemPaste(ClipboardContent, Target, Cancel)

expression A variable that represents an Explorer object.

Parameters

Name

Required/Optional

Data Type

Description

ClipboardContent

Required

Variant

The content to be pasted.

Target

Required

Folder

The destination of the paste.

Cancel

Required

Boolean

False when the event occurs. If the event procedure sets this argument to True, the operation is not completed and the item is not deleted.

This event can be cancelled after it has started.

The following Microsoft Visual Basic for Applications (VBA) example prompts the user before pasting the contents of the Clipboard to the specified target. If the user clicks Yes, the current content in the Clipboard is copied to the specified target destination. The sample code must be placed in a class module such as ThisOutlookSession, and the Initialize_handler routine must be called before the event procedure can be called by Outlook.

Public WithEvents myOlExp As Outlook.Explorer 
 
 
 
Sub Initalize_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 
 

Show:
© 2016 Microsoft