TExcelApplicationでフィルタ

---

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

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

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

編集 削除

---

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

失礼

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。

返信する