VBA Excel Sort question

I have a workbook with several sheets.  At the end of running a script, I want two of the sheets to sort.  I want the "Projects by Date" to sort by Date Descending (column G).  I want the "Completed" sheet to sort first by Category (Column A) and then by Date Ascending (column G).  Both sheets have a header row.

Here is what I am trying and it is not working:
Worksheets("Projects by Date").Range("G2").Sort Key1:=Range("G2"), Order1:=xlDescending, Header:=xlYes
Worksheets("Completed").Range("A2").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlYes
Worksheets("Completed").Range("G2").Sort Key1:=Range("G2"), Order1:=xlAscending, Header:=xlYes

Any help would be much appreciated!