Come passare rapidamente alla cella con la data corrente in Excel?
Ecco un foglio con un elenco di date, vuoi passare rapidamente alla cella che contiene la data corrente, come risolvere questo problema?
Vai alla data corrente con VBA
Vai alla data corrente con Trova e Sostituisci
Vai alla data corrente con VBA
Ecco un codice VBA che può aiutarti a passare rapidamente alla cella con la data corrente.
1. Attiva il workbook che desideri utilizzare e premi i tasti Alt + F11 per aprire la finestra Microsoft Visual Basic for Applications.
2. Clicca su Inserisci > Modulo, incolla il codice sottostante nel Modulo.
VBA: Vai alla data corrente
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. Premi F5 tasto, quindi il cursore salta alla cella con la data corrente ovunque ti trovi nel workbook.

Sblocca la Magia di Excel con Kutools AI
- Esecuzione Intelligente: Esegui operazioni sulle celle, analizza i dati e crea grafici — tutto guidato da semplici comandi.
- Formule Personalizzate: Genera formule su misura per ottimizzare i tuoi flussi di lavoro.
- Codifica VBA: Scrivi e implementa codice VBA senza sforzo.
- Interpretazione delle Formule: Comprendi facilmente formule complesse.
- Traduzione del Testo: Superare le barriere linguistiche all'interno dei tuoi fogli di calcolo.
Vai alla data corrente con Trova e Sostituisci
Se non sei familiare con il codice VBA, puoi anche applicare l'utilità Trova e Sostituisci per passare alla data corrente.
1. Attiva il foglio che contiene l'elenco delle date e seleziona una cella vuota, digita questa formula =OGGI(), premi Invio tasto, ora hai ottenuto la data di oggi.
2. Premi Ctrl + C per copiare la data di oggi, e vai a selezionare l'elenco delle date, quindi premi Ctrl + F per attivare la finestra di dialogo Trova e Sostituisci nella casella di testo Trova cosa premi Ctrl + V per incollare la data di oggi. Vedi screenshot:
3. Clicca Trova tutto. Ora il cursore salta alla cella con la data odierna nell'elenco selezionato.
I migliori strumenti per la produttività in Office
Migliora le tue competenze su Excel con Kutools per Excel e sperimenta un nuovo livello di efficienza. Kutools per Excel offre oltre300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Clicca qui per ottenere la funzione di cui hai più bisogno...
Office Tab porta l’interfaccia a schede su Office, rendendo il tuo lavoro molto più semplice
- Abilita la modifica a schede e la lettura in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, invece che in nuove finestre.
- Aumenta la tua produttività del50% e ti fa risparmiare centinaia di clic ogni giorno!