2 métodos para establecer la fecha de finalización predeterminada de las citas recurrentes de Outlook

En Outlook, cuando habilita "Recurrencia" para una cita, de forma predeterminada, se establecerá sin fecha de finalización. Si desea cambiarlo y establecer una fecha de finalización predeterminada para las citas periódicas, puede utilizar los métodos presentados en este artículo.

Cuando crea una nueva cita y hace clic en el botón "Recurrencia", en el cuadro de diálogo emergente "Recurrencia de la cita", puede ver que "Sin fecha de finalización" está seleccionada de forma predeterminada, como se muestra en la siguiente figura. Si no le gusta esto y desea establecer una fecha de finalización predeterminada, como 90 días desde la primera aparición, puede seguir leyendo. Aquí te enseñaremos 2 enfoques para realizarlo.

Método 1: Establecer cambiando el registro

1. Para empezar, ve al “Menú Inicio” y busca “regedit”.
2. Luego, haga clic en el programa "regedit" encontrado.
3. A continuación, aparecerá el cuadro de diálogo "Control de cuentas de usuario", en el que debe hacer clic en "Sí".
4. Después de acceder a la ventana "Editor del registro", navegue hasta la ruta - "HKEY_CURRENT_USER \ Software \ Microsoft \ Office \ \ Outlook \ Opciones \ Calendario ”
5. Más tarde, haga clic con el botón derecho en "Calendario" y seleccione "Nuevo"> "Valor DWORD (32 bits)".
6. Posteriormente, nombre este nuevo valor como "RecurrencesDefault".
7. A continuación, haga doble clic en el valor.
8. En el cuadro de diálogo emergente “Editar valor DWORD (32 bits)”, ingrese un número en el campo “Datos del valor”. Se refiere a la cuenta de días a partir de hoy. Por ejemplo, si es "90", Outlook establecerá la fecha de finalización de la recurrencia en 90 días a partir de hoy.
9. Luego, haga clic en "Aceptar" y salga del Editor del Registro correctamente.
10. Finalmente, reinicia Outlook e intenta crear una cita recurrente. Su fecha de finalización se establecerá según el valor de "RecurrencesDefault".

Método 2: configurar con Outlook VBA

1. Para empezar, active el editor VBA de Outlook pulsando “Alt + F11”.
2. Luego, coloque el siguiente código VBA en el proyecto "ThisOutlookSession".

Public WithEvents objInspectors As Outlook.Inspectors
Public 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_PropertyChange(ByVal Name As String)
    Dim objRecurrencePattern As Outlook.RecurrencePattern
 
    'Change enable "Recurrence"
    If Name = "IsRecurring" Then
       If objAppointment.IsRecurring = True Then
          Set objRecurrencePattern = objAppointment.GetRecurrencePattern
          'Change the end date to 30 days from the start date
          'Alter "30" as per your needs
          objRecurrencePattern.PatternEndDate = objRecurrencePattern.PatternStartDate + 30
       End If
    End If
End Sub

3. Por último, haga clic en la macro “Application_Startup” y pulse “F5”.
4. Actualmente, puede crear una nueva cita.
5. Luego, haga clic en el botón "Recurrencia", modifique la configuración de recurrencia manteniendo "Sin fecha de finalización" y haga clic en "Aceptar".
6. Más tarde, puede volver a hacer clic en "Recurrencia" para verificar. Verá que la fecha de finalización se ha cambiado según su código VBA.

Reparar archivo PST de Outlook inaccesible

¿Alguna vez ha recibido algún mensaje de error que involucre "archivo PST inaccesible" en su Outlook? Si es así, ¿cómo los trató? Quizás Scanpst se les ocurrió en primer lugar. Sin embargo, cuando lo intentaste arreglar Outlook, también falló. En este escenario, su último recurso es un software de recuperación de datos experimentado como DataNumen Outlook Repair o servicio de recuperación especializado.

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 corrección de sql y productos de software de reparación de Outlook. Para más información visite www.datanumen.com