Excelファイルを開いた時に、特定のシートに保護をかけたいです。
Excelファイルを開いた時に、特定のシートに保護をかけたいです。
http://okwave.jp/qa/q6067314.html
本日質問しましたカーソルの変な動作の原因というか引き金がわかりましたので、
再度質問致します。
Sheet1, Sheet2, Sheet3の3シートがあるExcelファイルを開いた時に、Sheet2に保護をかけたいです。
そこで、
ThisWorkbookの中に、以下のように記述しました。
Private Sub Workbook_Open()
Worksheets("Sheet2").Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, UserInterfaceOnly:=True
Worksheets("Sheet2").EnableSelection = xlUnlockedCells 'マクロ使用時には保護を無視したい
End Sub
このように記述し、Excelファイルを開くと、Sheet2に保護がかかります。
ただし、
（Excelファイルを開く際は、「前回保存時に開いていたシートで開く」と思うのですが、）
このExcelファイルをSheet1またはSheet3を表示させた状態で保存すると、
次にこのExcelファイルを開いた時になぜかSheet1または3にも保護がかかってしまいます。
この「Sheet1または3にかかった保護」は、一度別のシートに切り替えることで解除される一時的なものなのですが、
なぜ指定していないSheet1または3にも保護がかかってしまうのでしょうか。
ThisWorkbookへの書き方がまずいでしょうか。
以上、知っている方いましたらよろしくお願いいたします。
お礼
なるほど！ どうもありがとうございます。 今度行って探してみます。