Come filtrare i dati semplicemente facendo clic sul contenuto della cella in Excel?
Normalmente, in Excel, puoi applicare la funzione Filtro per filtrare i dati secondo le tue esigenze. Tuttavia, in questo articolo, parlerò di come filtrare i dati semplicemente facendo clic su un valore della cella. Prendi i seguenti dati come esempio: quando faccio doppio clic sulla cella A2, tutti i record corrispondenti basati su questo valore verranno filtrati immediatamente, come mostrato nello screenshot sottostante.
Filtra i dati semplicemente facendo clic su un valore della cella con il codice VBA
Filtra i dati semplicemente facendo clic su un valore della cella con il codice VBA
Qui ti fornirò un codice VBA per filtrare i dati facendo clic su una cella, procedi come segue:
1. Innanzitutto, dai un nome all'intervallo dei tuoi dati, inserisci un nome nell' area Nome e premi il tasto Invio, vedi screenshot:
2. Fai clic con il tasto destro sul tab del foglio che desideri filtrare facendo clic sulla cella, quindi scegli Visualizza Codice dal menu contestuale, e nella finestra Microsoft Visual Basic for Applications aperta, copia e incolla il seguente codice nel Modulo vuoto:
Codice VBA: Filtra i dati facendo clic sul valore della cella:
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby Extendoffice
Dim rgTable As Range
Dim rgData As Range
Dim xColumn As Integer
On Error Resume Next
Application.ScreenUpdating = False
Set rgTable = Range("mydata")
With rgTable
Set rgData = .Offset(1, 0).Resize(.Rows.Count - 1, .Columns.Count)
If Not Application.Intersect(ActiveCell, rgData.Cells) Is Nothing Then
xColumn = ActiveCell.Column - .Column + 1
If ActiveSheet.AutoFilterMode = False Then
.AutoFilter
End If
If ActiveSheet.AutoFilter.Filters(xColumn).On = True Then
.AutoFilter Field:=xColumn
Else
.AutoFilter Field:=xColumn, Criteria1:=ActiveCell.Value
End If
End If
End With
Set rgData = Nothing
Set rgTable = Nothing
Application.ScreenUpdating = True
End Sub
Nota: Nel codice sopra, mydata è il nome dell'intervallo che hai creato per il tuo intervallo di dati, cambialo secondo necessità.
3. Quindi salva e chiudi la finestra del codice; ora, quando fai doppio clic su qualsiasi cella dell'intervallo di dati che desideri filtrare, i relativi record verranno filtrati come mostrato nello screenshot seguente:

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.
Altri articoli correlati:
Come cambiare il valore della cella facendo clic sulla cella?
Come ordinare i dati della colonna facendo clic sull'intestazione in Excel?
I migliori strumenti per la produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un'efficienza mai vista prima. 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 in Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e la lettura a schede 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 riduce centinaia di clic del mouse ogni giorno!