¿Cómo automatizar recordatorios con fechas en Excel?

Automatizar recordatorios en Excel con fechas se puede lograr utilizando una combinación de funciones de Excel, formato condicional y, si es necesario, una macro en VBA. A continuación, te explico una manera de hacerlo:

Paso 1: Configurar tus datos

Organiza tus datos: Asegúrate de tener una columna para las fechas de los eventos que deseas recordar y otra columna donde se generará el recordatorio. Por ejemplo:

Columna A: Nombre del evento
Columna B: Fecha del evento
Columna C: Días para el recordatorio

Paso 2: Calcular los días restantes

   =B2-TODAY()

Calcula los días restantes: En una nueva columna, puedes calcular los días restantes hasta la fecha del evento. Por ejemplo, en la celda D2, escribe la fórmula:

Esto calculará el número de días restantes hasta el evento.

Paso 3: Aplicar formato condicional

Formato condicional para resaltar fechas próximas:

Selecciona las celdas de la columna D que contienen la fórmula de días restantes.
Ve a la pestaña Inicio > Formato condicional > Nueva regla.
Elige Formato de celdas que contengan > Menor que.
Introduce el número de días para el que quieres que aparezca la alerta, por ejemplo, 3.
Establece un formato (como relleno de color o texto en negrita) para resaltar la celda cuando falten menos de 3 días.

Paso 4: Crear una alerta o recordatorio (opcional)

Crear un mensaje de alerta (opcional):

Si deseas una notificación más activa, puedes usar VBA para mostrar un mensaje cuando se abra el archivo y haya fechas próximas. Aquí hay un ejemplo simple de cómo hacerlo:

     Sub Recordatorio()
         Dim c As Range
         Dim msg As String
         Dim contar As Integer
     
         contar = 0
         msg = "Tienes eventos próximos: " & vbCrLf
     
         For Each c In ThisWorkbook.Sheets("Sheet1").Range("D2:D10") ' Asegúrate de ajustar el rango según tu hoja de trabajo.
             If c.Value <= 3 And c.Value >= 0 Then
                 contar = contar + 1
                 msg = msg & c.Offset(0, -2).Value & " en " & c.Value & " días" & vbCrLf
             End If
         Next c
         
         If contar > 0 Then
             MsgBox msg, vbInformation, "Recordatorio de Eventos Próximos"
         End If
     
     End Sub

Paso 5: Ejecutar la macro al abrir el archivo

     Private Sub Workbook_Open()
         Call Recordatorio
     End Sub

Ejecutar la macro cuando se abre el archivo:

En el editor de VBA, ve a `ThisWorkbook` en tu proyecto y escribe el siguiente código:

Con estos pasos, tendrás un sistema básico de recordatorios automatizados en Excel, que te avisará de eventos próximos tanto visualmente como con un mensaje emergente si así lo deseas.