TExcelApplicationでフィルタ

studio-take 2012-10-14 03:08:54 No: 43169

毎度毎度すいません。
TExcelApplicationで、集計表を出した後、最後にフィルタを表示させて保存したいのですが、上手くいかないので教えてください。
マクロで録画できない処理なので、ちょっと難しいです。
ES:TExcelWorkSheet;

Range[RangeCode1,RangeCode2].AutoFilter(Variant(EndRow - StartRow),EmptyParam,EmptyParam,EmptyParam,Variant(True));
//AutoFilterMode[LCID] := True;

今、こんな感じですが、
「Error型からBoolean型への変換はできません」となります。
最後の引数のドロップダウンかなとは思うんですが…。

studio-take 2012-10-14 03:10:00 No: 43170

ES.Range[RangeCode1,RangeCode2].AutoFilter(Variant(EndRow - StartRow),EmptyParam,EmptyParam,EmptyParam,Variant(True));
ES.AutoFilterMode[LCID] := True;

失礼