Excel2010テーブル内の見出しの列番取得

質問

VBAでテーブル内のオートフィルターを処理するにあたり、

"AAA"という見出しの列でフィルターをかけたいのですが、
下記の構文等ではエラーが出てうまくいきませんでした。

Worksheetｓ("sheet1").ListObjects("xxx").Range.AutoFilter Field:="AAA", Criteria1:="<>"

なので、"AAA"の列が何番目なのかを取得して上記構文に代入しようとしているのですが、
どう記述すれば良いでしょうか？
ちなみにうまくいきませんでしたが、イメージは下記の通りです。（笑

列番号 = Worksheets("sheet1").ListObjects("xxx").ListColumns("AAA").Column

宜しくお願い致します。

回答No.1

m3_maki · ベストアンサー

惜しい！

列番号 = Worksheets("sheet1").ListObjects("xxx").ListColumns("AAA").Index

お礼

あ、ほんとだ。
惜しいですね。（笑

有難うございました。