シート保護の状態で行の追加を行いたい

ＥＸＣＥＬ２００３を利用しています。

　　　　　Ａ列　　Ｂ列
１行目　Ｂ　　　=Ａ１
２行目　Ｃ　　　=Ａ２

■Ａ列に変更可能な値
■Ｂ列に関数
※上記表記の各値はダミーです。

(1)Ｂ列の関数は変更されたくなく、表示もしたく無いので、セルの書式設定にて、セルをロック＆非表示
(2)Ａ列は変更を許可したいので、セルの書式設定にて、セルのロックを外す。
(3)上記(1)(2)を設定の上、シートの保護を実行。

ここで、３行目を挿入したいのですが、

シート保護のオプションで「行の挿入」を許可して、
普通に行の挿入を行うと、当たり前ですが、

　　　　　Ａ列　　Ｂ列
１行目　Ｂ　　　=Ａ１
２行目　Ｃ　　　=Ａ２
３行目　　　　　　　　

となり、Ｂ列の関数はコピーされません。
ここで、２行目を選択し、３行目にコピーしようとしても、
Ｂ列がロックされている為、コピーできません。

　　　　　Ａ列　　Ｂ列
１行目　Ｂ　　　=Ａ１
２行目　Ｃ　　　=Ａ２
３行目　　　　　=Ａ３　　　

上記のように行の追加を行うのが希望ですが、
何か良い方法は無いでしょうか。

なお、上記Ｂ列の関数は仮です。

No.1 ベストアンサー 回答者： nag0720 回答日時： 2011/08/06 03:18

Ｂ列に書き込むためには、シートの保護を解除しなければなりません。

それを手作業でできないのなら、VBAで記述するしかないでしょう。

（１）カーソルがある行をクリップボードにコピーする。
（２）カーソルがある行にクリップボードの内容をペーストする。ただし、ペーストの前後にシートの保護解除とシートの保護を行う。

これを実行する処理をVBAで作成して、マクロにするか、コマンドボタンに割り当てればいいでしょう。


この方法は、VBAやマクロの知識がある程度必要ですが、どのくらい理解しているんでしょうか？

この回答へのお礼

ありがとうございます。やはりマクロを組むしかありませんか。。。
あまり今回マクロを使用したくなかったのですが。
適当にマクロを組む事にします。

ありがとうございました。

お礼日時：2011/08/08 09:37