[[20150121162703]]　『オートフィルタ解除マクロ教えて下さい』（さゆり）　ページの最後に飛ぶ

『オートフィルタ解除マクロ教えて下さい』（さゆり）

 こんにちわ。
 オートフィルタ解除マクロ教えて下さい
 下記マクロを使ってフィルタ解除してもできません。
 他にオートフィルタ解除マクロがあれば教えて下さい

         'オートフィルタ解除
         Sheets("データ抽出").Select
         If Worksheets("データ抽出").AutoFilterMode Then
            Worksheets("データ抽出").AutoFilterMode = False     'ｵｰﾄﾌｨﾙﾀ解除
         End If

＜使用 Excel：Excel2010、使用 OS：Windows7 ＞

このVBA単体で動かしたらちゃんとフィルタは解除されました
もし間違いがあるのならシート名が違うかここ以外が間違えている場合があります。
ステップインやブレークポイントなどを使ってできているか確認してみてください。
（デイト） 2015/01/21(水) 16:48

 デイト様　コメント有難うございます。
 調べてみます。
（さゆり） 2015/01/21(水) 17:09

 オートフィルターの設定を無条件で解除したいなら、条件判定せず、
 Worksheets("データ抽出").AutoFilterMode = False     
 これ一本でいいですよ。設定されていなくても、こけることはないですから。

（β） 2015/01/21(水) 17:31

コメント返信：

[ 一覧(最新更新順) ]

[[20150121162703]] 『オートフィルタ解除マクロ教えて下さい』（さゆり） ページの最後に飛ぶ

[[20150121162703]]　『オートフィルタ解除マクロ教えて下さい』（さゆり）　ページの最後に飛ぶ