Come nascondere le righe in base alla data odierna in Excel?

Supponendo di avere una tabella di frutta in un foglio di lavoro come mostrato nell'immagine sottostante e di dover nascondere tutte le righe prima o dopo la data corrente (6/14/2016) nella tabella. Questo articolo fornisce tre metodi per te.

Nascondi le righe in base alla data odierna con la funzione Filtro
Nascondi le righe in base alla data odierna con il codice VBA
Nascondi le righe in base alla data odierna con Kutools per Excel

Nascondi le righe in base alla data odierna con la funzione Filtro

Con la funzione Filtro in Excel, puoi facilmente filtrare tutte le righe necessarie e nascondere tutte le righe indesiderate in base alla data odierna.

1. Nella tabella, fare clic sul pulsante a discesa nella colonna Data, quindi fare clic su Filtri data > Prima or Dopo. Vedi screenshot:

Note:

2. Nel Filtro automatico personalizzato finestra di dialogo, fare clic su Date picker accanto alla casella è dopo, quindi fare clic su Oggi pulsante nel calendario. Quindi fare clic su OK pulsante.

Quindi tutte le righe prima della data odierna vengono nascoste immediatamente.

Nascondi le righe in base alla data odierna con il codice VBA

Puoi anche applicare il codice VBA per nascondere le righe in base alla data odierna in Excel. Si prega di fare quanto segue.

1. Stampa altro + F11 tasti contemporaneamente per aprire il file Microsoft Visual Basic, Applications Edition finestra.

2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Moduli. Quindi copia e incolla il seguente codice VBA nella finestra.

Codice VBA: nascondi le righe in base alla data odierna in Excel

Private Sub Hidebtn_Click()
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        If xCell.Value < Now Then
            xCell.EntireRow.Hidden = True
        End If
    Next
End Sub

3. premi il F5 chiave, nel spuntare Kutools for Excel finestra di dialogo, selezionare la colonna dell'intervallo di date, quindi fare clic su OK pulsante.

Ora tutte le righe prima della data odierna vengono nascoste immediatamente.

Note:

Private Sub Showbtn_Click()
Rows.EntireRow.Hidden = False
End Sub

Nascondi le righe in base alla data odierna con Kutools per Excel

Grazie alla Seleziona celle specifiche utilità di Kutools for Excel, puoi selezionare facilmente tutte le righe prima o dopo la data odierna, quindi nasconderle manualmente.

1. Selezionare l'elenco di date nella tabella, quindi fare clic su Kutools > Seleziona > Seleziona celle specifiche. 

2. Nel Seleziona celle specifiche finestra di dialogo, selezionare il Intera riga opzione nel Tipo di selezione sezione e selezionare Meno di or Maggiore di opzione (qui seleziono l'opzione Meno di) nella prima Tipo specifico elenco a discesa, quindi inserisci la data odierna nella casella di testo successiva. Infine fare clic su OK pulsante. Vedi screenshot:

3. Quindi viene visualizzata una finestra di dialogo per indicare quante righe sono state selezionate, fare clic su OK pulsante. E puoi vedere tutte le righe prima che la data odierna sia selezionata come mostrato nell'immagine sottostante.

4. Fare clic con il pulsante destro del mouse sulla selezione, quindi fare clic nascondere nel menu di scelta rapida per nascondere tutte le righe selezionate prima della data odierna.

Articoli correlati:

• Come nascondere la casella di controllo quando la riga è nascosta in Excel?
• Come nascondere / mostrare righe o colonne con il segno più o meno in Excel?