特定のセルをアクティブにするとコマンド実行なんて、

質問

特定のセルをアクティブにするとコマンド実行なんて、
できますか？

たとえば、セルC3　に数値を入力し、エンターキーを押してセルC4がアクティブになったら
自動でコマンドを実行したいです。

セルC3以外には、数値は入力しません。

もっと具体的に使用状況を記入したほうがよいのか分かりませんでしたので、
とりあえず短文で質問させていただきます。
分かる方がいましたら教えてください。

回答No.3

keithin · ベストアンサー

シート名タブを右クリックしてコードの表示を選ぶ
現れたシートに下記をコピー貼り付ける

private sub worksheet_change(byval Target as excel.range)
　if target.address = "$C$3" then
　　application.enableevents = false
　　msgbox "macro run"
　　application.enableevents = true
　end if
end sub

ファイルメニューから終了してエクセルに戻る
C3セルに何か記入する。

お礼

お返事が遅くなりました。
なるほど、このように記入すればよいのですね。
worksheet_changeイベントを知りませんでした。
教えていただきありがとうございました。

回答No.2

f2s3f2

Excelですか？
SelectionChangeイベントかChangeイベント内で、アクティブなセル位置を調べてC4ならとif文入れとけばいけませんか？

お礼

お返事が遅くなりました。
SelectionChangeイベントのことをよく理解していないので、戸惑ってしまいました。
教えていただきありがとうございました。

回答No.1

kmetu

該当するシートのマクロで

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$C$4" Then
MsgBox "OH!!!"　'実行したいコマンド
End If
End Sub

でいかがでしょう。

お礼

お返事が遅くなりました。
こんなにシンプルに出来るのですね。
完全に自分の知識不足でした。
教えていただきありがとうございました。