Saltar al contenido principal

¿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 del desplegable 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(",,", ",")
    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

Note: 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.


Las mejores herramientas de productividad de oficina

Kutools para Outlook - Más de 100 potentes funciones para potenciar tu perspectiva

🤖 Asistente de correo AI: Correos electrónicos profesionales instantáneos con magia de IA: respuestas geniales con un clic, tono perfecto y dominio multilingüe. ¡Transforme el correo electrónico sin esfuerzo! ...

📧 Automatización de correo electrónico: Fuera de la oficina (disponible para POP e IMAP)  /  Programar envío de correos electrónicos  /  CC/CCO automático según reglas al enviar correo electrónico  /  Reenvío automático (reglas avanzadas)   /  Agregar saludo automáticamente   /  Divida automáticamente correos electrónicos de múltiples destinatarios en mensajes individuales ...

📨 Gestión de correo electrónico: Recuperar correos electrónicos fácilmente  /  Bloquear correos electrónicos fraudulentos por sujetos y otras personas  /  Eliminar correos electrónicos duplicados  /  Búsqueda Avanzada  /  Consolidar carpetas ...

📁 Archivos adjuntos profesionalesGuardar lote  /  Separación de lotes  /  Comprimir por lotes  /  Ahorro automático   /  Desconexión automática  /  Autocompresión ...

???? Interfaz mágica: 😊Más emojis bonitos y geniales   /  Aumente su productividad en Outlook con vistas con pestañas  /  Minimizar Outlook en lugar de cerrar ...

👍 Maravillas con un clic: Responder a todos los archivos adjuntos entrantes  /   Correos electrónicos antiphishing  /  🕘Mostrar zona horaria del remitente ...

👩🏼‍🤝‍👩🏻 Contactos y calendario: Agregar por lotes contactos de correos electrónicos seleccionados  /  Dividir un grupo de contactos en grupos individuales  /  Eliminar recordatorios de cumpleaños ...

Mas de Características 100 ¡Espere su exploración! Haga clic aquí para descubrir más.

 

 

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations