2017-02-06 11 views
-3

Excelシートで作業している間、バックグラウンドで実行し続けるマクロを作成します。VBA Excel - 列の特定の値が条件に一致する場合、メッセージを表示します。

機能:列全体の特定のセルがNow()の場合、メッセージボックスを表示します。

誰かがこのコードを共有できますか?

+1

ワークシートモジュールでこれを入れて?あなたは式のように 'Now()'を意味しますか?またはセルの値の時間値は現在の値に等しいか?とにかく、 'Worksheet_Change'イベントを読み込み、' Target.Column'を使って、特定の列の中に変更されたセルがあるかどうかを確認してください。 –

+3

[質問する方法をお読みください](http://stackoverflow.com/help/how -to-ask) –

+0

機能が絶えず動作しないようにします。そのワークシート・モジュール上にあるWorksheet_Change関数についていくつかの調査を行います。その後、そのワークシートへの変更が発生したときにのみ関数が実行されます。コードを記述する列またはセルをトラップできます。 –

答えて

0

は、あなたがこれまでに試してみました何

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
' for a certain column - in this case G 
    Dim Arr 
     Arr = Split(Target.Address, "$") 
     If Arr(1) = "G" Then 
      Beep 
      MsgBox "You have selected column G..." 
     End If 

' for a certain row - in this case 2 
    If Right(Target.Address, 2) = "$2" Then 
     Beep 
     MsgBox "You have selected Row 2..." 
    End If 

' for a certain cell - in this case A3 
    If Target.Address = "$A$3" Then 
     Beep 
     MsgBox "You have selected Cell A3..." 
    End If 


End Sub 
関連する問題