0
0

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?

More than 1 year has passed since last update.

【VBA】全角文字と半角文字の混ざった表にオートフィルタをかける際の注意点

Posted at

VBAのオートフィルタでちょっと詰まっていたが解決したので共有します。

発生バージョン:Excel2016

問題

全角文字と半角文字が混ざった列に下記のコードでオートフィルタをかけようとすると
見出しではなく1行目にかかってしまう

オートフィルタをかけようとするテーブル

ID name
a MOMOTARO
b さる
c いぬ
d きじ

ネットで調べるとよく出てくるオートフィルタの例
Range("A1").AutoFilter Field:=2, Criteria1:="MOMOTARO"

これでオートフィルタをかけると見出しではなく1行目にオートフィルタが
かかってしまう

1.png

ただ、nameがすべて半角文字(さる→SARU、いぬ→INU、きじ→KIJI)なら上手くいくようだ

2.png

解決

マクロの自動記録をつかってnameからMOMOTAROを抽出する操作を行ってみたところ以下のコードが得られた

Range("A1:B5").AutoFilter Field:=2, Criteria1:="MOMOTARO"

実行すると上手くいった

3.png

最初にRangeで表全体を指定するのが重要らしい

以上

0
0
0

Register as a new user and use Qiita more conveniently

  1. You get articles that match your needs
  2. You can efficiently read back useful information
  3. You can use dark theme
What you can do with signing up
0
0

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?