Advanced filter error when adding or deleting columns from source table

[Kannie]

Hi. My macro works currently as is. The error comes in when I add or delete columns from my source table. Is there a way I can adjust the code to make it more flexible to accommodate deleted and added columns.
The filtered data is copied to a sheet named "Reports".
This is the code:

Sheets("Order Details").Range("Table9[#All]").AdvancedFilter Action:= _
xlFilterCopy, CriteriaRange:=Sheets("Tables").Range("H42:I43"), _
CopyToRange:=Range("A2:AZ10000"), Unique:=False

Any help is appreciated.
Thanks