いつもお世話になります。

ExcelのVBAについてコードのサンプルを募集します。
呼び出されたシートの特定のセルが変更されたときに呼び出されるプロシージャを記述したいのですが、
「F6~F244の間で、かつ偶数のセル」が変更された際に、処理を行いたい場合どのような記述がよいでしょうか?

よろしくお願いします。

回答の条件
  • 1人5回まで
  • 13歳以上
  • 登録:2014/05/03 16:06:38
  • 終了:2014/05/04 00:18:45

ベストアンサー

id:snow0214 No.1

snow0214回答回数470ベストアンサー獲得回数1162014/05/03 17:17:55

ポイント300pt

こんな感じでどうでしょう。
指定セルが変更されるとメッセージボックスを表示します。

Sub Worksheet_Change(ByVal Target As Range)
    Dim r0, r1 As Integer
    r0 = 6
    r1 = 244
    If Target.Column = Range("F:F").Column And Target.Row >= r0 And Target.Row <= r1 And Target.Row Mod 2 = 0 Then
        MsgBox "セルの値が変更されました"
    End If
End Sub

コメントはまだありません

この質問への反応(ブックマークコメント)

トラックバック

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません