下の「シート保護」マクロは、パスワード「111」でシートを保護しなさい。
「シート保護解除」マクロは、パスワード「111」でシートの保護解除をしなさい。
という命令だと思うのですが・・・
Sub シート保護()
ActiveSheet.Protect possword = "111"
End Sub
Sub シート保護解除()
ActiveSheet.Unprotect possword = "111"
End Sub
パスワードを入力してシートの保護を解除しようとすると、
入力したパスワードは間違っています。
CapsLockキーがオフになっていることを確認し、
大文字と小文字が正しく使われていることを確認してください。
というメッセージが出るのですが・・・、
マクロで作成した保護は、マクロで解除しないとダメという意味なのですか?
シートで保護解除できるようにしたいのですが、できますか?
No.3ベストアンサー
- 回答日時:
:について...
私の勝手な解釈で宜しければ。
あるメソッドに対して複数の省略可能で、型が同じ(後、順不同)な
引数があるときに、これは何用の値だよ、と宣言しているだけかな?
そのまま=にしてしまうと、構文上宜しくないので:=にしている?
例えば、Protect メソッドのヘルプを見てみると
expression.Protect(Password, DrawingObjects, Contents,
Scenarios, UserInterfaceOnly)
↑という構文になっています。(ワークシート用)
で、引数はPassword,Structure,Windowsの5つ有りますよね。
この引数は全て省略可能になっていますが、もし、そうでない時は
expression.Protect("Password", "DrawingObjects", "Contents",
"Scenarios", "UserInterfaceOnly")
となり、順番道理に値を使えばよいのですが、省略可能云々の条件で
~~:=と言うのを使わずに
expression.Protect("Password", "UserInterfaceOnly")
と書いてしまうと、
Password="Password", DrawingObjects="UserInterfaceOnly"
となってしまいます。
それでは困るので、~~:=を使い、この値は~~用の値だよと明示的に
宣言しているのではないでしょうか。
あまり文書で説明するのは得意でないので、よく解らないかも知れませんが...
こんな説明でどうでしょ。
注:Protectの引数は実際にはPassword以外"True"か"False"です。
ここでは、"UserInterfaceOnly"等にしていますが、それでは正常に
動作しないと思いますので...
あと、繰り返し書きますが、何かで読んだ、誰かに教わったと言う訳では
有りません。私の勝手な解釈です。
ご丁寧な解説、頭の下がる思いです。
ありがとうございました。
自宅ではインターネットをしていないので、カフェより返信です。
印刷して持って帰ります。
かなり・・・感激しました。
またいつか、お世話してください・・・。
No.2
- 回答日時:
どもです。
惜しいですね、ちょっとした記述ミスです。
オブジェクト(ActiveSheets)とメソッド(Protect)は合ってます。
でメソッドの引数がちょっとだけ間違ってます。
possword = "111" '元
password:="111" '修正後
これで試してみてください。
Unprotectも同じです。
掲示板上でも記述ミス・・・
passwordと入っていました。
「:」がなかったみたいです・・・。
「:」はどのような役目を果たしているのですか?
機会がありましたら、また教えてください。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/03/01 15:44
- Visual Basic(VBA) ExcelVBA ドロップボックスで月を選択するとそれ以降のデータが残るようにしたい。 3 2022/12/16 14:53
- Excel(エクセル) エクセルVBA Workbooks.Addで作成されたブックのシート保護の解除について 1 2023/02/23 08:02
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/03/02 08:40
- Excel(エクセル) エクセルでシート保護のかかり方の違いとセルの非保護の設定 3 2022/08/09 10:02
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/06/01 14:45
- Visual Basic(VBA) vbaでセルに入力したときに,その横にあるセルを保護し入力不可にするマクロを作りたいです。 2 2022/04/24 20:59
- Visual Basic(VBA) VBA Userform転記のみ編集可 1 2023/06/29 11:03
- Visual Basic(VBA) excel vba でユーザーフォーム入力ができない 2 2022/12/12 14:42
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/13 08:41
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
別のシートから値を取得するとき
-
特定の文字を含むシートだけマ...
-
VBA 入力月で該当シートを選択...
-
VBA 存在しないシートを選...
-
Excel VBA 複数行を数の分だけ...
-
別のシートを参照して計算する方法
-
ユーザーフォームに入力したデ...
-
実行時エラー1004「Select メソ...
-
excelのマクロで該当処理できな...
-
【ExcelVBA】全シートのセルの...
-
実行時エラー'1004': WorkSheet...
-
Excel チェックボックスにチェ...
-
セルのコピーで「オブジェクト...
-
エクセルVBAでダブルクリックを...
-
複数シートに色付きセル(条件つ...
-
重複するidをデータごとにまと...
-
一括印刷マクロ シート名を数字...
-
VBA 最終行まで数式をコピーする
-
Excel マクロについての相談
-
エクセルのシート名変更で重複...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
別のシートから値を取得するとき
-
ユーザーフォームに入力したデ...
-
【ExcelVBA】全シートのセルの...
-
同じ作業を複数のシートに実行...
-
Excelマクロのエラーを解決した...
-
excelのマクロで該当処理できな...
-
XL:BeforeDoubleClickが動かない
-
ExcelVBA シート名を複数セルか...
-
実行時エラー'1004': WorkSheet...
-
VBA 存在しないシートを選...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
ブック名、シート名を他のモジ...
-
【Excel VBA】Worksheets().Act...
-
ExcelのVBAのマクロで他のシー...
-
エクセルのシート名変更で重複...
-
特定の文字を含むシートだけマ...
-
シートが保護されている状態で...
-
Excel マクロについての相談
-
VBA 検索して一致したセル...
おすすめ情報