office2000 VB6操作EXCEL自动排序解决办法

office2000 VB6操作EXCEL自动排序最近在维护一个老项目,用的是office2000的API请问谁知道VB6调用office200

office2000 VB6操作EXCEL自动排序
最近在维护一个老项目,用的是office2000的API 
请问谁知道VB6调用office2000 EXCEL的API排序?

我在网上找了这样一段代码

VB code
   ExcelSheet.Range("A2:J20").Sort Key1:=Range("J1"), Order1:=xlDescending, Header:= _   xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _   SortMethod:=xlPinYin, DataOption1:=xlSortNormal

但是在office2000下报错

[解决办法]
額……綁定了
[解决办法]
http://www.ocxt.com/

方便快捷