オートフィルタと列の保護は重複出来ない？

質問

エクセル２０００である表を作成しました。
検索しやすいようにオートフィルタを設定しています。
ある列に関しては数式が入っている為間違って書き換えられないように
保護を掛けようと思ったのですがうまくいきません。
オートフィルタとの重複した設定は出来ないのでしょうか？

回答No.2

Wendy02 · ベストアンサー

こんばんは。

Excel　2000では、マクロからの設定しかありません。

まず、オートフィルタを設定してから、シートを保護してください。
次に、Visual Basic Editor 画面(Alt + F11 )で開けて、左上端に、プロジェクト-VBAProject という窓の中に、ファイル名があって、そこに「Thisworkbook」 という文字があるはずですから、それをダブルクリックして、以下のコードを貼り付けます。後は、ブックを保存して、それをもう一度、ブックを開ければ、もう設定されています。

以下では、シート1(Sheet1)に設定するようになっていますから、違う場合は、With Sheet1 の行の部分を書き換えてください。

'ThisWorkbook モジュール
Private Sub Workbook_Open()
With Sheet1
　.Unprotect
　.EnableAutoFilter = True
　.Protect UserInterFaceOnly:=True
End With
End Sub

お礼

ありがとうございました。
そういうほ方法があるのですね。
大変勉強になりました。

回答No.1

toshi_2000

エクセル２０００では、できないようです。
エクセル２００２なら、シート保護に細かい設定ができます。

お礼

ありがとうございました。
２００２なら簡単に出来るのかもしれませんね。
参考になりました。