¿Cómo saltar rápidamente a la celda con la fecha actual en Excel?

Aquí hay una hoja con una lista de fechas, y quieres saltar rápidamente a la celda que contiene la fecha actual. ¿Cómo resolver este problema?

Saltar a la fecha actual con VBA

Saltar a la fecha actual con Buscar y Reemplazar

Saltar a la fecha actual con VBA

Aquí hay un código VBA que puede ayudarte a saltar rápidamente a la celda con la fecha actual.

1. Habilita el libro que deseas usar y presiona las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

2. Haz clic en Insertar > Módulo, pega el siguiente código en el Módulo.

VBA: Saltar a la fecha actual

Private Sub Workbook_Open()
'UpdatebyExtendoffice
    Dim daterng As Range
    Dim DateCell As Range
    Dim WorkSht As Worksheet
    Dim dateStr As String
    Application.ScreenUpdating = False
    For Each WorkSht In Worksheets
        WorkSht.Select
        'Set daterng = Range("A:A")
        Set daterng = WorkSht.UsedRange
        'daterng.Select
        For Each DateCell In daterng
            DateCell.Activate
            ActiveCell.Select
            On Error Resume Next
            dateStr = DateCell.Value
            If dateStr = Date Then
                DateCell.Select
                Exit Sub
            End If
        Next
    Next WorkSht
    Application.ScreenUpdating = True
    'Worksheets(1).Select
End Sub

3. Presiona F5 y luego el cursor saltará a la celda con la fecha actual, sin importar dónde te encuentres en el libro.

Descubre la Magia de Excel con Kutools AI

• Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
• Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
• Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
• Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
• Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.

Potencia tus capacidades de Excel con herramientas impulsadas por IA. ¡Descarga Ahora y experimenta una eficiencia como nunca antes!

Saltar a la fecha actual con Buscar y Reemplazar

Si no estás familiarizado con el código VBA, también puedes aplicar la utilidad Buscar y Reemplazar para saltar a la fecha actual.

1. Habilita la hoja que contiene la lista de fechas, selecciona una celda en blanco, escribe esta fórmula =HOY(), presiona Enter y ahora obtienes la fecha de hoy.

2. Presiona Ctrl + C para copiar la fecha de hoy, ve a seleccionar la lista de fechas y luego presiona Ctrl + F para habilitar el Buscar y Reemplazar cuadro de diálogo, en el Buscar lo siguiente cuadro de texto, presiona Ctrl + V para pegar la fecha de hoy. Ver captura de pantalla:

3. Haz clic en Buscar Todo. Ahora el cursor salta a la celda con la fecha de hoy en la lista seleccionada.

Consejo: Si tienes Kutools para Excel, puedes aplicar su función Seleccionar celdas específicas para manejar rápidamente esta tarea. Tiene todas las funciones sin limitación durante 30 días, descárgalo y pruébalo gratis ahora.