Passwordプロパティ

質問

Sub test()
Debug.Print ActiveWorkbook.Password
End Sub
を実行すると
********
が返ってくるのですが
パスワードはかけてないファイルでも、かけてるファイルでも
必ず「********」が返ってくるのですか？

だとしたら意味のないプロパティな気がするのですが・・・・

回答No.2

WindFaller · ベストアンサー

ご質問の趣旨がはっきりしませんが、

>パスワードはかけてないファイルでも、かけてるファイルでも
>必ず「********」が返ってくるのですか？

そうです。

>Debug.Print ActiveWorkbook.Password

これでは意味ありません。そもそも伏字に返ろうが、開いている時だけのコードです。
開いている最中なら、パスワードが分からなくても、マクロで、パスワードを潰(クラック）してしまうから、新しいパスワードを設定できてしまいます。しかし、元のパスワードは分かりません。

もともとは、
ActiveWorkbook.Password　="myPSW"

とパスワードを設定させるためのものではないでしょうか？
なぜ、伏字であろうが、意味のない文字が返るか理由は分かりません。

お礼

ありがとうございます。

回答No.1

MarcoRossiItaly

パスワードがそんなに簡単にバレてしまったら、たいへんだと思いませんか？ Password プロパティが何をするものなのかは、VBE のヘルプで見てください。

お礼

ありがとうございます。