Note: The other languages of the website are Google-translated. Back to English

¿Cómo retrasar el envío de la invitación a la reunión en Outlook? 

Normalmente, puede aplicar la función de Entrega diferida para enviar un mensaje en un momento específico en lugar de ahora. Pero, a veces, desea retrasar el envío de una invitación a una reunión como un correo electrónico. ¿Cómo podría enviar una invitación a una reunión en el momento deseado como lo necesita en Outlook?

Retrasar el envío de una invitación a una reunión en Outlook con código VBA


Retrasar el envío de una invitación a una reunión en Outlook con código VBA

Puede ser que no haya una forma directa de retrasar una invitación a una reunión en Outlook, pero el siguiente código de VBA puede hacerle un favor, haga lo siguiente:

1. Primero, debe crear una nueva tarea. En el nuevo Tarea ventana:

(1.) Especifique el tema, fecha de inicio, fecha de finalización de la reunión;

(2.) Establezca una fecha y hora de recordatorio cuando desee enviar la invitación a la reunión;

(3.) Escriba el mensaje de la reunión que necesite.

doc retrasar el envío de la reunión 1

2. Después de crear la tarea, haga clic en Guardar cerrar opción para cerrar esta ventana.

3. Luego, mantenga presionado el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

4. En la Microsoft Visual Basic para aplicaciones ventana, haga doble clic Esta sesión de Outlook de Proyecto1 (VbaProject.OTM) panel para abrir el modo y luego copie y pegue el siguiente código en el módulo en blanco.

Código VBA: retrasa el envío de una invitación a una reunión:

Private Sub Application_Reminder(ByVal Item As Object)
    Dim xTaskItem As TaskItem
    Dim xAppointmentItem As AppointmentItem
    Dim xRcpArr() As String
    If (Item.Class <> olTask) Or (LCase(Item.Subject) <> "Meeting test") Then
        Exit Sub
    End If
    Set xTaskItem = Item
    xRcpArr = VBA.Split("yy@addin99.com,sky@addin99.com,ruby@addin99.com", ",")
    Set xAppointmentItem = Outlook.Application.CreateItem(olAppointmentItem)
    With xAppointmentItem
        .MeetingStatus = olMeeting
        For i = 0 To UBound(xRcpArr)
            .Recipients.Add (xRcpArr(i))
        Next
        .Subject = xTaskItem.Subject
        .Location = "Office room 1002"
        .Start = xTaskItem.StartDate + #2:00:00 PM#
        .Body = xTaskItem.Body
        .Duration = 120
        .ReminderSet = True
        .ReminderMinutesBeforeStart = 20
        .Save
        .Send
    End With
    xTaskItem.MarkComplete
    Set xTaskItem = Nothing
End Sub

doc retrasar el envío de la reunión 2

Nota:: En el código anterior: Prueba de reunión es el asunto que creó para la reunión en el paso 1; y debe cambiar la información de direcciones de destinatarios, lugar de reunión, hora de inicio y duración de la reunión a la tuya.

5. Guarde y cierre el código, luego reinicie Outlook para que este código surta efecto.

6. A partir de ahora, cuando aparezca el recordatorio del elemento de la tarea a la hora específica que establezca, Outlook enviará la invitación a la reunión automáticamente.


Kutools para Outlook: trae 100 funciones avanzadas a Outlook y hace que el trabajo sea mucho más fácil.

  • Auto CC / BCC por reglas al enviar correo electrónico; Reenvío automático Varios correos electrónicos personalizados; Respuesta automática sin servidor de intercambio y más funciones automáticas ...
  • Advertencia de BCC - mostrar mensaje cuando intente responder a todos si su dirección de correo está en la lista CCO; Recordar si faltan archivos adjuntosy más funciones de recordatorio ...
  • Responder (todos) con todos los archivos adjuntos en la conversación de correo; Responder muchos correos electrónicos en segundos; Agregar saludo automáticamente cuando responda; Agregar fecha al asunto ...
  • Herramientas de archivos adjuntos: administre todos los archivos adjuntos en todos los correos, Desconexión automática, Comprimir todo, Renombrar todo, Guardar todo ... Informe rápido, Contar correos seleccionados...
  • Potentes correos electrónicos no deseados por costumbre; Eliminar correos y contactos duplicados... Le permite hacerlo de forma más inteligente, más rápida y mejor en Outlook.
tiro kutools outlook kutools pestaña 1180x121
tiro kutools outlook kutools plus pestaña 1180x121
 
Comentarios (0)
Aún no hay calificaciones. ¡Sé el primero en calificar!
No hay comentarios publicados aquí todavía
Deje sus comentarios
Publicar como invitado
×
Califica esta publicación:
0   Personajes
Ubicaciones sugeridas

Seguinos

Copyright © 2009 - www.extendoffice.com. | Reservados todos los derechos. Energizado por ExtendOffice, | Mapa del Sitio
Microsoft y el logotipo de Office son marcas comerciales o marcas comerciales registradas de Microsoft Corporation en los Estados Unidos y / o en otros países.
Protegido por Sectigo SSL