dポイントプレゼントキャンペーン実施中!

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("F4") Then
Call Nyuuryoku
End If
End Sub

のようにしたのに、まったく変化が現れません。

Nyuusyoku()の中身をコマンドボタンに割り付けたら、きちんと動作したので
中身に問題があるわけじゃなさそうです。

なぜダメなのでしょうか?

A 回答 (2件)

No1です。



If Target = Range("F4") Thenでも動きました。
    • good
    • 0
この回答へのお礼

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

お礼日時:2004/02/02 17:53

If Target.Address = Range("F4") Thenを



If Target.Row = 4 And Target.Column = 6 Then

に変えると動くようです。
    • good
    • 0

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