Comment accéder rapidement à la cellule contenant la date actuelle dans Excel ?

Voici une feuille contenant une liste de dates. Vous souhaitez accéder rapidement à la cellule contenant la date du jour. Comment résoudre ce problème ?

Accéder à la date actuelle avec VBA

Accéder à la date actuelle avec Rechercher et Remplacer

Accéder à la date actuelle avec VBA

Voici un code VBA qui peut vous aider à accéder rapidement à la cellule contenant la date actuelle.

1. Activez le classeur que vous souhaitez utiliser, puis appuyez sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur Insérer > Module, puis collez le code ci-dessous dans le Module.

VBA : Accéder à la date actuelle

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. Appuyez sur F5 , puis le curseur se déplace vers la cellule contenant la date actuelle, où que vous soyez dans le classeur.

Découvrez la magie d'Excel avec Kutools AI

• Exécution intelligente : Effectuez des opérations sur les cellules, analysez les données et créez des graphiques, le tout piloté par des commandes simples.
• Formules personnalisées : Générez des formules adaptées pour rationaliser vos flux de travail.
• Codage VBA : Écrivez et implémentez du code VBA sans effort.
• Interprétation des formules : Comprenez facilement des formules complexes.
• Traduction de texte : Surmontez les barrières linguistiques dans vos feuilles de calcul.

Améliorez vos capacités Excel avec des outils alimentés par l'IA. Téléchargez maintenant et découvrez une efficacité sans précédent !

Accéder à la date actuelle avec Rechercher et Remplacer

Si vous ne maîtrisez pas bien le code VBA, vous pouvez également utiliser l'utilitaire Rechercher et Remplacer pour accéder à la date actuelle.

1. Activez la feuille contenant la liste des dates, sélectionnez une cellule vide, puis saisissez cette formule =AUJOURDHUI(), puis appuyez sur Entrée . Vous obtenez maintenant la date d'aujourd'hui.

2. Appuyez sur Ctrl + C pour copier la date d'aujourd'hui, puis allez sélectionner la liste des dates et appuyez sur Ctrl + F pour ouvrir la fenêtre Rechercher et Remplacer . Dans la zone de texte Rechercher quoi , appuyez sur Ctrl + V pour coller la date d'aujourd'hui. Consultez la capture d'écran :

3. Cliquez sur Rechercher tout. Maintenant, le curseur se déplace vers la cellule contenant la date d'aujourd'hui dans la liste sélectionnée.

Astuce : Si vous avez Kutools pour Excel, vous pouvez appliquer son utilitaire Sélectionner des cellules spécifiques pour gérer rapidement cette tâche. Il est entièrement fonctionnel sans limitation pendant 30 jours, veuillez télécharger et essayer gratuitement dès maintenant.