プロが教えるわが家の防犯対策術!

こんにちは。

よく使うコピー&貼り付けを、マクロにして、ボタンの設定をしました。

他人に計算式をいじられたくないので、シート保護をかけています。
が、そのマクロを一度使うと、計算式が正常にコピーされません。

そこ自体の計算式は非常に単純なものなのですが・・・

例)
A1 B1+C1
A3 B3+C3
A5 B5+C5
(上下でセルを結合させています)

A20 B20C+C20
(A21とA22でセルを結合させています)

マクロ
1)「A1:A6」コピー&値貼り付け&コピー
2)A8:A13 貼り付け
※上記もそれぞれ上下2セルを結合しています。
3)「A20」コピー
4)「A1:A6」へ貼り付け
※消えた計算式を復活

これだけのことです。
ですが、シート保護を外すと何度も繰り返し使えますが、
保護した途端一度きりになってしまいます。

一体に何に問題があるのでしょうか?

A 回答 (1件)

保護されているセルは、マクロでもそのまま貼り付けなどの「変更」はできません



コピー&ペーストを行う前に
 ActiveSheet.Unprotect
で一旦シート保護を解除し、一連の処理が終わってから
 ActiveSheet.Protect Contents:=True
で再度保護をかけ直す必要があります

この回答への補足

ありがとうございます。

ですが、この方法だと保護解除のパスワードを聞かれますよね?
他の人も使う可能性があり、パスワードは告知したくないのですが、
パスワード入力が不要になる方法はないものでしょうか?

補足日時:2007/09/19 17:47
    • good
    • 2
この回答へのお礼

「ActiveSheet.Protect UserInterfaceOnly:=True」を使えば良いみたいです。

無事できました。
ありがとうございました。

お礼日時:2007/09/20 09:22

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています


このQ&Aを見た人がよく見るQ&A