エクセルで上書き保存がクリックされたらデ－タをコピーしたい

よろしくお願いします。エクセルで、上書き保存のアイコンがクリックされたら
または、「？？？への変更を保存しますか」に対して「はい」を選択した時に
開いているブックのシートＡのセルＣ３のデ－タをシートＢのＤ５にコピーする
為には、多分ＶＢＡを使わないとだめでしょうが、どんな風に書けばいいのでしょうか。またもしもＶＢＡを使わずにできる方法があれば教えて下さい。
なお、私はベーシックの経験はありますが、ＶＢＡはさっぱり解りません。
ビジュアルベーシックエディターを開いて、ＶＢＡマクロをそっくりコピー
したことはあります。素人に教えるのは大変面倒かとは思いますが、よろしく
ご指導お願いします。

No.1 ベストアンサー 回答者： gonta_goma 回答日時： 2002/03/05 21:29

ビジュアルベーシックエディターを開いて、ThisWorkBookに以下のマクロをコピーで良いと思います。

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
　Worksheets("A").Range("C3").Copy Worksheets("B").Range("D5")
End Sub

この回答へのお礼

gonta gomaさん教えていただきましてありがとうございます。
明日の朝までに作りたかったのですが、うっかり「暇なときに・・・」に
なってしまって心配してました。
これでどうやら間に合いそうでほっとしました。
どうもありがとうございました。

お礼日時：2002/03/05 22:25