LiinaNeedsAdvice
New Member
- Joined
- Sep 8, 2015
- Messages
- 1
Hi!
I have a VBA issue that is taking up way too much time guessing at. So, I hope that someone may be able to help!
I have a product listing table ranging from A6 (heading) to BB2609 (including subtotal).
I am trying to auto-filter column O to display what is found in cell O5. Cell O5 is made up of =F2&F3&F4&F5 , all of which are free entry cells for either Y for yes or N for no, for different product categories that can be chosen for inclusion in the table, or not.
This is the code I have entered for auto filter of column O based on O5, but it doesn't work. Can anyone help me to figure out why? What can I do to make this work?
Here is the code I have entered:
Private Sub Worksheet_Change(ByVal Target As Range)
If (Intersect(Target, Range("O5")) Is Nothing) _
Then
Exit Sub
End If
Cells.AutoFilter Field:=15, Criteria1:="=" & Range("O5")
End Sub
I have a VBA issue that is taking up way too much time guessing at. So, I hope that someone may be able to help!
I have a product listing table ranging from A6 (heading) to BB2609 (including subtotal).
I am trying to auto-filter column O to display what is found in cell O5. Cell O5 is made up of =F2&F3&F4&F5 , all of which are free entry cells for either Y for yes or N for no, for different product categories that can be chosen for inclusion in the table, or not.
This is the code I have entered for auto filter of column O based on O5, but it doesn't work. Can anyone help me to figure out why? What can I do to make this work?
Here is the code I have entered:
Private Sub Worksheet_Change(ByVal Target As Range)
If (Intersect(Target, Range("O5")) Is Nothing) _
Then
Exit Sub
End If
Cells.AutoFilter Field:=15, Criteria1:="=" & Range("O5")
End Sub