Macro to Sort all rows by column G regardless of sheet or workbook name

[lichldo]

I used the "Record Macro" to do what I wanted, but that builds the code around the tab name and I want to be able to use this macro on multiple tabs

So I all I want to do is be able to sort all rows by column G (which will always be named "Handler (Job)") and of course leave Row 1 alone at the top with my column headers, but have it work in any file regardless of workbook name or tab name

thanks so much

 

[kevin9999]

You can get around the need to specify the sheet name by using ActiveSheet instead:

With ActiveSheet.Range("G1").CurrentRegion
    .Sort Key1:=Range("G1"), order1:=xlAscending, Header:=xlYes
End With