I have many tables and I have to run VBA code for each table because the tables have different names. Is there a way to set the table name as a variable?
Here is my code.
Sub filter_all_tables_by_date()
x = Worksheets.Count
On Error Resume Next
For i = 1 To x
Sheets(i).Select
Range("A1").Select
ActiveSheet.ShowAllData
ActiveSheet.ListObjects("I-HAVE-TOO-MANY-TABLES-THIS-NEEDS-TO-BE-A-VARIABLE").Range.AutoFilter Field:=3, Criteria1:=1, _
Operator:=11, Criteria2:=0, SubField:=0
Next i
On Error GoTo 0
Sheets(1).Select
End Sub
Here is my code.
Sub filter_all_tables_by_date()
x = Worksheets.Count
On Error Resume Next
For i = 1 To x
Sheets(i).Select
Range("A1").Select
ActiveSheet.ShowAllData
ActiveSheet.ListObjects("I-HAVE-TOO-MANY-TABLES-THIS-NEEDS-TO-BE-A-VARIABLE").Range.AutoFilter Field:=3, Criteria1:=1, _
Operator:=11, Criteria2:=0, SubField:=0
Next i
On Error GoTo 0
Sheets(1).Select
End Sub