Initiating a Macro

[Setts]

I would like to initiate a macro when a cell has a specific value or
satisfies a formula (e.g. A>B). Is that possible? Thanks in advance. JS

 

[Mike H]

Hi,

You could use the worksheet change event. Right click your sheet tab, view
code and paste this in

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Or IsEmpty(Target) Then Exit Sub
If Target.Address = "$A$1" Then
If IsNumeric(Target) Then
On Error Resume Next
Application.EnableEvents = False
If Target.Value > Range("B1").Value Then
'do your thing
End If
Application.EnableEvents = True
On Error GoTo 0
End If
End If
End Sub

Now if A1 changes to a value greater than B1 you can run some code.

Mike

 

[Don Guillett]

More detail. Any cell, specific cell, before/after