Přejít k hlavnímu obsahu

Jak rychle přeskočit na buňku s aktuálním datem v aplikaci Excel?

Autor: Sun Naposledy změněno: 2024-09-25

Zde je list se seznamem dat, chcete rychle přeskočit na buňku, která je s aktuálním datem, jak vyřešit tento problém?

Přejít na aktuální datum pomocí VBA

Přeskočte na aktuální datum pomocí funkce Najít a nahradit


šipka modrá pravá bublina Přejít na aktuální datum pomocí VBA

Zde je kód VBA, který vám pomůže rychle přejít do buňky s aktuálním datem.

1. Povolte sešit, který chcete použít, a stiskněte Alt + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2. cvaknutí Vložit > Modul, vložte pod kód do Modul.

VBA: Přejít na aktuální datum

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

zkopírujte a vložte kód vba do modulu

3. lis F5 klávesu, pak kurzor přeskočí na buňku s aktuálním datem, kamkoli sešitu najdete.
spustit kód pro skok na aktuální datum

snímek obrazovky kutools pro excel ai

Odemkněte Excel Magic pomocí Kutools AI

  • Chytré provedení: Provádějte operace s buňkami, analyzujte data a vytvářejte grafy – to vše pomocí jednoduchých příkazů.
  • Vlastní vzorce: Vytvářejte přizpůsobené vzorce pro zefektivnění vašich pracovních postupů.
  • Kódování VBA: Napište a implementujte kód VBA bez námahy.
  • Výklad vzorce: Snadno porozumíte složitým vzorcům.
  • Překlad textu: Prolomte jazykové bariéry ve svých tabulkách.
Vylepšete své možnosti aplikace Excel pomocí nástrojů založených na umělé inteligenci. Stáhnout nyní a zažijte efektivitu jako nikdy předtím!

šipka modrá pravá bublina Přeskočte na aktuální datum pomocí funkce Najít a nahradit

Pokud nejste obeznámeni s kódem VBA, můžete také použít Najít a nahradit nástroj pro přechod na aktuální datum.

1. Povolte list, který obsahuje seznam dat, a vyberte prázdnou buňku, zadejte tento vzorec = DNES (), lis vstoupit klíč, teď dostanete dnešní datum.
zadejte fromula a získejte dnešní datum

2. lis Ctrl + C zkopírujte datum dneška, vyberte seznam dat a stiskněte Ctrl + F k povolení Najít a nahradit v dialogovém okně Najít to, co textové pole, stiskněte Ctrl + V vložit dnešní datum do. Viz snímek obrazovky:
zkopírujte dnešní datum pro vyhledání a nahrazení dialogového okna

3. cvaknutí Najít vše. Nyní kurzor přeskočí na buňku s dneškem ve vybraném seznamu.
kliknutím na Najít vše přejděte na buňku aktuálního data

Tip: Pokud máte Kutools pro Excel, můžete použít jeho Vyberte konkrétní buňky rychle zvládnout tento úkol. Plně funkční bez omezení za 30 dní, prosím stáhněte si a získejte bezplatnou zkušební verzi hned teď.
skok na aktuální datum podle funkce kutools

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více
Používejte Kutools ve vašem preferovaném jazyce – podporuje angličtinu, španělštinu, němčinu, francouzštinu, čínštinu a více než 40 dalších!

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!