シートの再表示でパスワードを設定したい

質問

こんにちは。
エクセルのシートで、「書式」→「シート」→「表示しない」を選択してsheet1を表示させなくします。そして、再表示をさせるときにパスワードを設定したいのですが、どうやればいいのでしょうか？宜しくお願いします。

回答No.1

surounin · ベストアンサー

「ツール」→「保護」→「ブックの保護」
で出来ると思いますけど

お礼

回答ありがとうございます。シートを隠した後にブックの保護をすればよいのですね。確認しました。ありがとうございます。

回答No.2

WWolf

基本的にＮｏ１さんの回答で可能ですが、ちょっと趣向をかえて・・・
シート２にコマンドボタンを作成し下記のマクロをコマンドボタンに登録

Sub test()
If Worksheets(1).Visible = -1 Then
ans = MsgBox("非表示にしますか？", 4)
If ans = 6 Then
Worksheets(1).Visible = False
Exit Sub
End If
Else
pass = InputBox("PassWord")
If pass = 1234 Then　’パスワードは自由に設定してください。
Worksheets(1).Visible = True
Else
MsgBox "No!!"
End If
End If

End Sub

お礼

回答ありがとうございます。マクロ作成でも出来るのですね。今回はシートを隠せれば良かったので、No1さんの回答を参考にさせてもらいました。
でもこのマクロは他のファイルの作成にとっても役立つので使用させてもらいます。ありがとうございました。