De forma predeterminada, cuando crea una cita o reunión, la duración predeterminada se establece en media hora. Si desea cambiarlo, puede consultar los 2 métodos presentados en este artículo.
Como puedes ver, al crear una nueva cita o reunión, la duración se establece automáticamente en 30 minutos. Sin embargo, en la práctica, esto no resulta práctico para la mayoría de los usuarios. Por ello, muchos prefieren modificar la duración predeterminada de las citas y reuniones según sus preferencias. Para abordar esta necesidad, te mostraremos dos maneras de hacerlo. Sigue leyendo para conocerlas en detalle.

Método 1: cambiar la escala de tiempo
- Para empezar, abre Outlook.
- Luego, vaya al panel "Calendario" y abra la carpeta de calendario deseada.
- A continuación, vaya a la pestaña "Ver" y seleccione "Cambiar vista"> "Calendario".
- Posteriormente, haga clic en el botón "Ver configuración".
- En el cuadro de diálogo emergente de "Configuración de vista avanzada: Calendario", haga clic en el botón "Otras configuraciones".
- Luego, en el cuadro de diálogo siguiente, puede cambiar la escala de tiempo. Seleccione un período de tiempo según la duración deseada. Aquí solo hay 6 opciones.
- Después de eso, haga clic en varios botones "Aceptar" para cerrar todos los cuadros de diálogo.
- A partir de ahora, cuando cree una nueva cita o reunión, la duración predeterminada será la misma que la escala de tiempo seleccionada.
Sin embargo, esta media tiene dos mayores inconvenientes. Una es que solo hay 2 opciones para seleccionar. No se puede especificar la duración a voluntad. La otra es que esto solo puede funcionar en la vista "Calendario". Si cambia a otra vista, la duración volverá a ser de media hora. Por lo tanto, pase al método siguiente, que puede eliminar estas deficiencias.
Método 2: cambiar a través de VBA
- En primer lugar, presione los botones "Alt + F11" en la ventana de Outlook.
- Luego, en la siguiente ventana del editor de VBA, abra el proyecto "ThisOutlookSession".
- A continuación, copie y pegue los siguientes códigos VBA en él.
Private WithEvents objInspectors As Outlook.Inspectors
Private WithEvents objAppointment As Outlook.AppointmentItem
Private Sub Application_Startup()
Set objInspectors = Outlook.Application.Inspectors
End Sub
Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
If TypeOf Inspector.CurrentItem Is AppointmentItem Then
Set objAppointment = Inspector.CurrentItem
End If
End Sub
Private Sub objAppointment_Open(Cancel As Boolean)
'Set the default duration of new appointment
If objAppointment.CreationTime = #1/1/4501# Then
objAppointment.Duration = "50"
End If
End Sub
Private Sub objAppointment_PropertyChange(ByVal Name As String)
'When you disable the "All Day Event"
'Change the default duration of the current appointment
If Name = "AllDayEvent" Then
If objAppointment.AllDayEvent = False Then
objAppointment.Duration = "50"
End If
End If
End Sub
- Después de eso, firme este código.
- Luego, cambie la configuración de las macros para permitir macros firmadas digitalmente.
- Finalmente, reinicie Outlook para activar la macro.
- A partir de entonces, la duración de la cita y la reunión se establecerá igual a la duración determinada en los códigos VBA, como la siguiente imagen.
Evite la dolorosa pérdida de datos de Outlook
Nadie está dispuesto a sufrir la pérdida de datos de Outlook PST. Por lo tanto, si desea deshacerse de la frustrante pérdida de datos PST, debe tomar las 2 precauciones necesarias. Una son las copias de seguridad de datos PST consistentes y actualizadas. El otro es conseguir una herramienta de reparación de buena reputación, como DataNumen Outlook Repair, Que puede arreglar PST problemas de manera efectiva.
Introducción del autor:
Shirley Zhang es experta en recuperación de datos en DataNumen, Inc., que es el líder mundial en tecnologías de recuperación de datos, incluyendo daño de mdf y productos de software de reparación de Outlook. Para más información visite www.datanumen.com



