Filter table based on cell input

[jtmarsh123]

Good morning everyone,

I have gone through several forums and tried several VB codes but I just can't get the VB code to work.

Problem:
I am trying to filter a table based on a drop down selection.
example:
I have a drop down list in cell B1 with the following options - Sales A, Sales B, Sales C
I have a table/range A5:F14

Ref	C1	C2	Sales	Size	Product
1	100	101	Sales A	2	A
2	200	102	Sales B	4	B
3	300	103	Sales C	6	C
4	400	104	Sales A	8	A
5	500	105	Sales B	10	B
6	600	106	Sales C	12	C
7	700	107	Sales A	14	A
8	800	108	Sales C	16	C
9	900	109	Sales B	18	B

<tbody>
</tbody>

When I select an input from the drop down list in B1 - I would like the above table to filter on D5 (Sales) and display the results.

Can anyone please assist?

Kindest regards,

Jtmarsh

 

[jtmarsh123]

BTW this is the code I've tried to use:

Private Sub Worksheet_Change(ByVal Target As Range)
'Filter Column D based on value in B1, Criteria ">="
   If Target.Address = "$B$1" Then
       ActiveSheet.Range("$A$5:$F$14").AutoFilter _
               Field:=4, Criteria1:=">=" & Range("B1")
   End If
End Sub

 

[jtmarsh123]

Got it to work. The issue was a slight formula correction. Needed to make the Criteria1 "equal" instead of "greater than and equal too".

Hope this helps.
Regards

Private Sub Worksheet_Change(ByVal Target As Range)
'Filter Column D based on value in B1, Criteria ">="
   If Target.Address = "$B$1" Then
       ActiveSheet.Range("$A$5:$F$14").AutoFilter _
               Field:=4, Criteria1:=">=" & Range("B1")
   End If
End Sub

[/QUOTE]

BTW this is the code I've tried to use:

Private Sub Worksheet_Change(ByVal Target As Range)
'Filter Column D based on value in B1, Criteria ">="
   If Target.Address = "$B$1" Then
       ActiveSheet.Range("$A$5:$F$14").AutoFilter _
               Field:=4, [COLOR=#ff0000]Criteria1:="="[/COLOR] & Range("B1")
   End If
End Sub

 

[jtmarsh123]

Okay so now I have another issue. I am trying to filter on two columns with two different reference cells. However when I try, the first filter is always replaced by the second.
For example (from above):
I have a drop down list in cell B1 with the following options - Sales A, Sales B, Sales C
I have another drop down list in cell B3 with the following options - 2, 4, 6, 8, 10, 12, 14

I want to be able to filter my table with unique values entered from B1 and B3 - so that I can filter on the Sale and Size.

Any ideas?