ＶＢＡマクロについて教えてください

続けての質問で恐縮です。
次の意味がわかりません。ＶＢＡのヘルプでもでてきません。
どなたか教えてください。ちょっとほかの部分を手直しするのに、これはどうしたら良いものか判断がつきません。

userinterfaceonly:=False

よろしくお願いします。

No.3 ベストアンサー 回答者： nishi6 回答日時： 2002/03/07 16:39

ProtectメソッドのUserInterfaceOnlyでしょうか。

解説には、
『
UserInterfaceOnly 省略可能です。バリアント型 (Variant) の値を指定します。True を指定すると、画面上からの変更は保護されますが、マクロからの変更は保護されません。この引数を省略すると、マクロからも、画面上も変更することができなくなります。

引数 UserInterfaceOnly に True を設定した Protect メソッドをブックのワークシートに適用した場合、保存して閉じた後でもう一度開いたブックに対しては、画面上からもマクロからも変更ができなくなります。マクロからの変更を可能にするためには、引数 UserInterfaceOnly に True を設定した Protect メソッドを再び適用する必要があります。
』とあります。

VBE画面で、表示→オブジェクトブラウザで『protect』を検索して出てきます。

この回答への補足

nishi6さんありがとうございました。
これから仕事ですので明日また改めてお礼申し上げます。

補足日時：2002/03/07 18:22

この回答へのお礼

nishi6さん、詳しく説明していただきましてありがとうございました。
おかげさまでちょっと前にやっと完成しました。
もうくたくたです。ＶＢＡはいまだによく理解できてないので説明不足の点もあったかと思います。お許しください。
教えていただいたことは印刷して大切に保存します。

お礼日時：2002/03/10 03:26

No.4 回答者： maruru01 回答日時： 2002/03/07 17:01

再び、maruru01です。

おそらく、No.3の人の方が正しいのでそちらを信用して下さい。
どちらにしろ、Microsoftのホームページで検索出来ます。
では。

No.2 回答者： maruru01 回答日時： 2002/03/07 16:32

こんにちは。

maruru01です。

とりあえず、何のVBAか書きましょう。それと、前後の詳細も。いきなりこの1行ではわからないです。
（続けての質問ということでも、毎回書くのが常識です。）

確かにヘルプにはなかったので、Microsoftのホームページで「userinterfaceonly」で検索したらいくつかヒットしました。
そのなかで今回の件に関することは、おそらく次の内容でしょう。
シート保護のメソッドProtectの5番目の引数で、サポートされていません。
サポートされていない引数にはFalseを代入するか、省略しないとエラーになるようです。
したがってこのままにしておくか、引数自体を削除すればいいと思います。

MicrosoftのURLを載せておきますので、ご自分で検索して見てください。
では。

参考URL：http://www.microsoft.com/japan/ms.htm

この回答への補足

maruru01さん、ありがとうございます。確かに一行だけ書かれても
困りますね。失礼しました。
これから仕事なので明日また改めて御礼します。
今晩仕事に使うマクロなのでひと安心しました。

補足日時：2002/03/07 18:15

この回答へのお礼

ｍａｒｕｒｕ０１さんどうもお世話になりました。
検索で見つかりました。それにしても、検索画面の最初で
こんなことまで見つかってしまうのには驚きました。
おかげさまでたった今ｂａｓｉｃプログラムをエクセルで作り直し
できました。昨日からずーとやっていたので、物が二重に見えます。
どうもありがとうございました。
これからは答えていただく方のことも考えて質問するようにします（反省）

お礼日時：2002/03/10 03:18

No.1 回答者： bin-chan 回答日時： 2002/03/07 16:29

:=が使用されてるので、元のコマンドが何かありますよね？

前後の部分についても教えてください。

この回答への補足

説明不足がありました。教えてもらう立場にありながら配慮が
足りず失礼しました。次のようになっています。
どうぞよろしくお願いします。

Sheets("abc").Activate
With ActiveSheet
.Range("C4").Select
.Protect contents:=True, userinterfaceonly:=False
.EnableSelection = xlUnlockedCells
End With

補足日時：2002/03/07 18:24