Compartir a través de


Evento Explorer.BeforeItemCopy (Outlook)

Se produce cuando se copia un elemento de Outlook.

Sintaxis

expresión. BeforeItemCopy( _Cancel_ )

Expresión Variable que representa un objeto Explorer .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Cancel Obligatorio Boolean False cuando se produce el evento. Si el procedimiento de evento establece este argumento en True, la operación no se completa y el elemento no se copia.

Comentarios

Este evento puede cancelarse después de haber comenzado.

Ejemplo:

En el ejemplo siguiente de Microsoft Visual Basic para Aplicaciones (VBA), el sistema pregunta al usuario antes de que se copie un elemento. Se muestra un mensaje al usuario para comprobar si se debe copiar el elemento. Si el usuario hace clic en Yes, se copia el elemento en el Portapapeles. El código de ejemplo debe colocarse en un módulo de clase como ThisOutlookSession, y se debe llamar a la Initialize_handler rutina antes de que Microsoft Outlook pueda llamar al procedimiento de evento.

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

Consulte también

Objeto Explorer

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.