Supponendo, ho un intervallo di dati in un foglio di lavoro, ora, voglio nascondere automaticamente le colonne in base a una data specifica. Ad esempio, quando inserisco la data 5/16/2016 in una cella, voglio nascondere le colonne la cui data è inferiore a questa data specifica immediatamente come mostrato nella seguente schermata. Questo articolo introdurrà alcuni trucchi per risolverlo.
Nascondi automaticamente le colonne in base a una data specifica con codice VBA
Nascondi le colonne in base a una data specifica con Kutools per Excel
Nascondi automaticamente le colonne in base a una data specifica con codice VBAPer completare questa attività, il seguente codice VBA può aiutarti, per favore fai come segue:
1. Seleziona la scheda del foglio che desideri nascondere per data e fai clic con il pulsante destro del mouse per scegliere Visualizza codice dal menu contestuale per andare al file Microsoft Visual Basic, Applications Edition finestra, quindi copia e incolla il codice seguente nel modulo:
Codice VBA: nascondi 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 la data nella cella K4, le colonne la cui data è inferiore a questa data specifica verranno nascoste automaticamente.
Osservazioni:: Nel codice sopra, K4 è la cella della data specifica su cui desideri nascondere le colonne in base, A1: I1 è che le celle della riga contengono la data che hai usato.
Nascondi le colonne in base a una data specifica con Kutools per ExcelSe non hai familiarità con il codice, ecco uno strumento utile:Kutools for Excel, Con la sua Seleziona celle specifiche utility, puoi finire questo lavoro con facilità.
| Kutools for Excel : con oltre 300 utili componenti aggiuntivi di Excel, da provare gratuitamente senza limitazioni in 30 giorni. |
Dopo l'installazione Kutools for Excel, si prega di fare come segue:
1. Seleziona le intestazioni della data e fai clic su Kutools > Seleziona > Seleziona celle specifiche, vedi screenshot:
2. Nel saltò fuori Seleziona celle specifiche finestra di dialogo, selezionare Colonna intera dal Tipo di selezione, quindi scegli i criteri, ad esempio Meno di dal Tipo specifico elenco a discesa e inserisci la data nella casella di testo accanto alla quale desideri nascondere le colonne in base a, vedi screenshot:
3. E poi clicca Ok pulsante, le colonne specifiche la cui data è inferiore a 5/16/2016 vengono selezionate contemporaneamente, vedi screenshot:
4. Quindi fare clic con il pulsante destro del mouse su un'intestazione di colonna selezionata e selezionare nascondere per nascondere le colonne selezionate di cui hai bisogno. Vedi screenshot:
Fai clic su Scarica gratuitamente Kutools per Excel ora!
