I'm actually using Excel 97 (Not 2000) - although looking on MSDN the 'Sort' methods calling parameters haven't changed at all.
I would code the following...
CHWORKSHEET:Range("A3:Z1000"):Sort(
CHWORKSHEET:Range("G3"), /* Key1 */
1, /* Order1 */
, /* Key2 */
, /* Type */
, /*...