Evento Application.ItemSend (Outlook)
Se produce siempre que se envía un elemento de Microsoft Outlook, ya sea por el usuario a través de un Inspector (antes de cerrar el inspector pero después de que el usuario hace clic en el botón Enviar ) o cuando se usa el método Send para un elemento de Outlook, como MailItem, en un programa.
Sintaxis
expresión. ItemSend( _Item_ , _Cancel_ )
expresión Variable que representa un objeto Application.
Parámetros
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Item | Obligatorio | Object | Elemento que se va a enviar. |
| Cancel | Obligatorio | Boolean | False cuando se produce el evento. Si el procedimiento de evento establece este argumento en True, la acción de envío no se completa y el inspector se queda abierto. |
Comentarios
Este evento no está disponible en Microsoft Visual Basic Scripting Edition (VBScript).
Ejemplo:
El siguiente ejemplo de Microsoft Visual Basic para aplicaciones (VBA) se muestra cómo cancelar el evento ItemSend en respuesta a la entrada del usuario. El código de ejemplo debe ubicarse en un módulo de clase y se debe llamar a la rutina de Initialize_handler antes de que Outlook pueda llamar al procedimiento de evento.
Public WithEvents myOlApp As Outlook.Application
Public Sub Initialize_handler()
Set myOlApp = Outlook.Application
End Sub
Private Sub myOlApp_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim prompt As String
prompt = "Are you sure you want to send " & Item.Subject & "?"
If MsgBox(prompt, vbYesNo + vbQuestion, "Sample") = vbNo Then
Cancel = True
End If
End Sub
Vea también
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.