Come nascondere automaticamente le colonne in base alla data in Excel?

Supponiamo di avere un intervallo di dati in un foglio di lavoro e ora voglio nascondere le colonne in base a una data specifica in modo automatico. Ad esempio, quando inserisco la data 16/5/2016 in una cella, voglio nascondere immediatamente le colonne con date precedenti a questa data specifica, come mostrato nello screenshot seguente. Questo articolo introdurrà alcuni trucchi per risolvere il problema.

Nascondere automaticamente le colonne in base a una data specifica con il codice VBA

Nascondere le colonne in base a una data specifica con Kutools per Excel

Nascondere automaticamente le colonne in base a una data specifica con il codice VBA

Per completare questo compito, il seguente codice VBA potrebbe esserti utile, procedi come segue:

1. Seleziona la scheda del foglio che desideri nascondere in base alla data, fai clic con il pulsante destro del mouse e scegli Visualizza Codice dal menu contestuale per andare alla finestra Microsoft Visual Basic for Applications, quindi copia e incolla il seguente codice nel Modulo:

Codice VBA: Nascondere automaticamente le colonne in base a una data specifica:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    Dim xCell As Range
    If Target.Address <> Range("K4").Address Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In Range("A1:I1")
        xCell.EntireColumn.Hidden = (xCell.Value < Target.Value)
    Next
    Application.ScreenUpdating = True
End Sub

2. Quindi salva e chiudi questo codice, torna al foglio di lavoro, e ora, quando inserisci una data nella cella K4, le colonne con date precedenti alla data specificata verranno nascoste automaticamente.

Nota: Nel codice sopra, K4 è la cella della data specifica in base alla quale vuoi nascondere le colonne; A1:I1 sono le celle della riga che contengono la data utilizzata.

Nascondere le colonne in base a una data specifica con Kutools per Excel

Se non sei familiare con il codice, ecco uno strumento pratico - Kutools per Excel, con la sua funzione Seleziona Celle Specifiche, puoi completare questo lavoro con facilità.

Dopo aver installato Kutools per Excel, procedi come segue:

1. Seleziona le intestazioni delle date e fai clic su Kutools > Seleziona > Seleziona Celle Specifiche, vedi screenshot:

2. Nella finestra di dialogo Seleziona Celle Specifiche visualizzata, seleziona Colonna intera dal tipo di selezione, quindi scegli i criteri, come Minore di dall'elenco a discesa Tipo specifico, e inserisci la data nella casella di testo successiva in base alla quale vuoi nascondere le colonne, vedi screenshot:

3. Quindi fai clic sul pulsante Ok, le colonne specifiche con date precedenti al 16/5/2016 verranno selezionate immediatamente, vedi screenshot:

4. Fai quindi clic con il pulsante destro del mouse su una qualsiasi intestazione di colonna selezionata e seleziona Nascondi per nascondere queste colonne selezionate secondo necessità. Vedi screenshot: