[[20070221180503]]　『シートの保護をかけた状態でオートフィルタをかけ』（ヒデ）　ページの最後に飛ぶ

『シートの保護をかけた状態でオートフィルタをかける』（ヒデ）
シートの保護をかけた状態でオートフィルタをかける（データ→フィルタ→オートフィルタのチェック）方法はありますでしょうか？
保護をかけた状態でオートフィルタでフィルタをかけて抽出する方法は、過去のログから探すことができたのですが・・・
VBAを使った裏技とか無いでしょうか？
よろしくおねがいします。
Excel2003を使用。
OSはWindowsXPです。

 マクロでやるにしても、
 シートの保護の解除
   ⇒オートフィルタ
   ⇒シートの保護（「オートフィルタの使用」にチェック）
 ぐらいしかないのでは？
 (Mook)

コメントありがとうございました。

 やはり保護を外さずに「オートフィルタの使用」にチェックは無理ですよね。

 ちなみに、マクロ上でオートフィルタでフィルタをかけている状態かを知るには
 どこを参照すれば良いでしょうか？
 マクロを起動させたときに、オートフィルタでフィルタリングされている状態か
 確認して、フィルタリングされている場合は、マクロを終了させるプログラムに
 したいのですが・・・

 ヒデ

 >参照? 
 こうゆうことですか
 Sub test()
   If ActiveSheet.AutoFilterMode = True Then
      MsgBox "オートフィルタはONです"
'      Range("A1").AutoFilter
      Exit Sub
   Else:
      MsgBox "オートフィルタはOFFです"
   End If    
 End Sub
(kohe)

コメント返信：

[ 一覧(最新更新順) ]

[[20070221180503]] 『シートの保護をかけた状態でオートフィルタをかけ』（ヒデ） ページの最後に飛ぶ

[[20070221180503]]　『シートの保護をかけた状態でオートフィルタをかけ』（ヒデ）　ページの最後に飛ぶ