[[20080515110145]] 『オートフィルターについて』(日向夏) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『オートフィルターについて』(日向夏)

 常々、勉強させて頂いています。ご教示して下さる方々に
 お礼申し上げます。
 現在、業務用のシートに印刷マクロを組んでいます。
 その一連の中で、シートにオートフィルターが作動している
 場合と作動してない時があります。その状態を判別してする、
 マクロはあるのでしょうか?
 現在、マクロは、印刷→オートフィルター解除→セルA1選択
 としていますが、オートフィルター状態でない場合にエラー
 となるので困っております。ご教示お願いします。

 こんなことかしら?

  With Worksheets("指定シート")
   If .FilterMode Then   'フィルタ モードがON だったら
     .AutoFilterMode = False  'オートフィルタを解除する
   End If
     '処理
  End With

  (kanabun)

 kanabunさんへ

 早々に有難うございました。解決しました。
 また、宜しくお願いします。
               (日向夏)


 kanabunさん こんにちは

 >If .FilterMode Then   'フィルタ モードがON だったら
 この真偽判定は必要ないように思ったのですが、、、

 ヘルプでは、
 >Worksheet.AutoFilterMode プロパティ
 >FilterMode プロパティの値に依存しません。 
 >True の場合、下向き矢印を表示します。False の場合、下向き矢印を削除します。
 >ただし、このプロパティを True に設定することはできません。

 (半平太)

 半平太 さん、ご指摘ありがとうございます。

 おっしゃる通りですね。

 >  .AutoFilterMode = False  'オートフィルタを解除する

 だけで、現在のフィルタ状態にかかわらず OFF にできました。

 また教えてください  (kanabun)

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.