VBA to filter a table based on selected cell

[cee_real]

Hello,

I need a VBA to filter a table based on a selection from a dropdown on cell G5. The table is on the same sheet and the filter is on the second column of the table. The table is titled "Table35"

For example, I want to select "Monday" from the drop down on cell G5. Then, the table35 below will filter for only rows that say "Monday"

 

[JustynaMK]

Try this code:

Sub foo()    With Sheet1
        .ListObjects("Table35").Range.AutoFilter Field:=2, Criteria1:=.Range("G5").Value
    End With
End Sub

Change "Sheet1" to appropriate sheet name. Hope it helps.

 

[cee_real]

This one isn't working. Any other suggestions?

 

[John_w]

In the sheet's module:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$G$5" Then
        Me.ListObjects("Table35").Range.AutoFilter Field:=2, Criteria1:=Target.Value
    End If
End Sub