请大侠们帮忙啊！！！使用OLE调用Excel中排序的问题 (100分)

我的代码如下，运行到这里时出现错误，怎么修改都不行，请大侠们帮忙啊！！！
Sheet.Range['B45:U48'].Sort('Range("U45")',xlDescending);

注意：我要的是
var ExcelApp: Variant;
ExcelApp := CreateOleObject( 'Excel.Application' );这种方法
而不是使用Delphi 控件的方法

[blue]我的意图是把'B45:U48'的数据按U45列进行降序排列[/blue]
附VB宏代码：
Range("B45:U48").Select
Selection.Sort Key1:=Range("U45"), Order1:=xlDescending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortNormal

dd[]

怎么没有人帮忙啊？不会都没有做过吧！

我已经搞定了，呵呵~~~

接受答案了.