I'm having a problem with the autofilter in my code. err number '1004'
the table range is called "Smart" its three columns and about 8 rows in size.
I've tried everything and can't find a solution. Any help will be greatly appreciated. If any additional info is needed let me know
the table range is called "Smart" its three columns and about 8 rows in size.
I've tried everything and can't find a solution. Any help will be greatly appreciated. If any additional info is needed let me know
Code:
Private Sub Category_Change()
Dim mStr As String
mStr = Form.Category.Value
[COLOR=Red]ActiveSheet.ListObjects(1).Range.AutoFilter.AutoFilter Field:=2, Criteria1:="=*" & mStr & "*"[/COLOR]
Range("Smart").Resize(Range("Smart").Rows.Count, 1).SpecialCells(12) = "Selection_Name"
Form.Selection_Name.RowSource = "Selection_Name"
End Sub