¿Cómo cambiar la configuración predeterminada de los eventos de todo el día a «Ocupado» en Outlook?

De forma predeterminada, Outlook establece el estado de las reuniones como «Ocupado», pero marca los eventos de todo el día como «Libre» (véase la captura de pantalla siguiente). Cada vez que cree un evento de todo el día, deberá cambiar manualmente su estado «Mostrar como» a «Ocupado». Para modificar este comportamiento y establecer «Ocupado» como el estado predeterminado para los eventos de todo el día, este artículo le ofrece dos métodos.

Cambiar la configuración predeterminada de los eventos de todo el día a ocupado creando un formulario personalizado

Un formulario personalizado le permite crear un evento de todo el día con el estado predeterminado «Mostrar como» configurado en «Ocupado». Siga estos pasos.

1. Cambie a la vista Calendario y haga clic en «Inicio» > «Cita».

2. En la ventana Cita, haga clic en «Desarrollador» > «Diseñar este formulario».

Consejo: Si la pestaña «Desarrollador» no aparece en la Cinta de opciones, siga los métodos de este artículo para mostrarla.

3. Entonces, la ventana de cita entrará en modo de diseño. Haga clic en la pestaña «(P.2)».

4. Arrastre por separado el campo «Evento de todo el día» y el campo «Estado ocupado» desde el panel «Selector de campos» hasta el tablero ubicado bajo la pestaña «(P.2)».

5. Haga clic con el botón derecho en el campo «Evento de todo el día» que haya arrastrado y seleccione «Propiedades» en el menú contextual.

6. En el cuadro de diálogo «Propiedades», realice la siguiente configuración.

7. Haga clic con el botón derecho en el cuadro combinado del campo «Estado ocupado» y elija «Propiedades» en el menú contextual.

8. En el cuadro de diálogo «Propiedades», realice la siguiente configuración.

9. Haga clic en «Publicar» > «Publicar formulario como» en la Cinta de opciones.

10. En el cuadro de diálogo «Publicar formulario como», deberá:

11. Cierre la ventana de cita sin guardar los cambios.

12. A partir de ahora, para crear un evento de todo el día con el estado «Mostrar como» predeterminado en Ocupado, cambie a la vista «Calendario» y haga clic en «Inicio» > «Nuevos elementos» > «Formularios personalizados» > «El nombre del formulario personalizado».

Nota: Para crear un evento de todo el día con el estado «Mostrar como» predeterminado en «Libre», proceda como siempre: haga clic en «Inicio» > «Cita» y, a continuación, active la casilla «Evento de todo el día» en la ventana «Cita».

Cambiar la configuración predeterminada de los eventos de todo el día a ocupado mediante VBA

El método anterior implica demasiados pasos. Si siempre necesita crear eventos de todo el día con el estado «Mostrar como» predeterminado en «Ocupado», el siguiente código VBA le permitirá hacerlo de forma rápida y sencilla.

1. Inicie Outlook y pulse simultáneamente las teclas «Alt» + «F11» para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

2. En la ventana «Microsoft Visual Basic para Aplicaciones», haga doble clic en «Proyecto1» > «Objetos de Microsoft Outlook» > «ThisOutlookSession» para abrir la ventana «ThisOutlookSession (Código)» y, a continuación, copie el siguiente código en ella.

Código VBA: Establecer el estado predeterminado de los eventos de todo el día en «Ocupado»

Public WithEvents GInspectors As Inspectors
Public WithEvents GAppointmentItem As AppointmentItem

Private Sub Application_Startup()
'Updated by Extendoffice 20220413
  Set GInspectors = Application.Inspectors
End Sub

Private Sub GInspectors_NewInspector(ByVal Inspector As Inspector)
  Select Case Inspector.CurrentItem.Class
    Case olAppointment
      Set GAppointmentItem = Inspector.CurrentItem
  End Select
End Sub

Private Sub GAppointmentItem_Open(Cancel As Boolean)
  Select Case GAppointmentItem.AllDayEvent
    Case True
      GAppointmentItem.BusyStatus = olBusy
  End Select
End Sub

Private Sub GAppointmentItem_PropertyChange(ByVal Name As String)
  If Name = "AllDayEvent" Then
    Select Case GAppointmentItem.AllDayEvent
      Case True
        GAppointmentItem.BusyStatus = olBusy
    End Select
  End If
End Sub

3. Guarde el código VBA y reinicie Outlook.

A partir de ahora, al convertir una cita o reunión en un evento de todo el día, el estado «Mostrar como» se establecerá automáticamente en «Ocupado».

Artículos relacionados

---

Las mejores herramientas de productividad para Office

¡Descubra el nuevo Kutools para Outlook con 100+ funciones increíbles!¡Haga clic para descargar ahora!

🤖KUTOOLS AI:Utiliza tecnología avanzada de IA para gestionar correos electrónicos sin esfuerzo, incluyendo responder, resumir, optimizar, ampliar, traducir y redactar correos.

📧Automatización de correo electrónico: Respuesta automática (disponible para POP e IMAP) / Programar el envío de correos electrónicos / CC/BCC automático según reglas al enviar correos / Reenvío automático (regla avanzada) / Añadir saludo automáticamente / Dividir automáticamente los correos con múltiples destinatarios en mensajes individuales...

📨Gestión de correo electrónico: Recupera tus correos electrónicos / Bloquea correos fraudulentos por asunto y otros criterios / Elimina correos electrónicos duplicados / Búsqueda avanzada / Organiza tus carpetas…

📁Archivos adjuntos Pro: Guardar en lote / Desvincular en lote / Comprimir en lote / Guardar automáticamente / Desconectar automáticamente / Auto comprimir...

🌟Magia de la interfaz: 😊Más emojis bonitos y modernos / Le avisa cuando llegan correos importantes / Minimiza Outlook en lugar de cerrarlo…

👍Maravillas con un solo clic: Responder a Todos con Adjuntos / Correos electrónicos antiphishing / 🕘 Mostrar zona horaria: hora actual del remitente...

👩🏼‍🤝‍👩🏻Contactos y calendario: Crear contactos en lote a partir de correos seleccionados / Dividir un grupo de contactos en grupos individuales / Eliminar recordatorio de cumpleaños...

Utilice Kutools en su idioma preferido: compatible con inglés, español, alemán, francés, chino y más de 40 idiomas adicionales.

Desbloquee Kutools para Outlook al instante con un solo clic. ¡No espere más: descárguelo ahora y potencie su eficiencia!

Lista de funciones de Kutools para Outlook      Descargar ahora      Ir a comprar

🚀 Descarga con un solo clic — Obtenga todos los complementos de Office

Muy recomendado: Kutools for Office (5 en 1)

Un solo clic para descargar cinco instaladoresa la vez —Kutools para Excel, Outlook, Word, PowerPointy Office Tab Pro.¡Haga clic para descargar ahora!

• ✅Comodidad con un solo clic: Descargue los cinco paquetes de instalación de una sola vez.
• 🚀Listo para cualquier tarea de Office: Instale los complementos que necesite, justo cuando los necesite.
• 🧰Incluido: Kutools para Excel / Kutools para Outlook / Kutools para Word / Office Tab Pro / Kutools for PowerPoint

Acerca del Conjunto⬇ Descargar el Conjunto💳 Comprar el Conjunto