How do I run a macro when a value occurs in a cell

A

AlfD

Hi!

This is a trivial example but you can build on it:

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("D3") = 36 Then
Range("D3").Interior.ColorIndex = 6
Else
Range("D3").Interior.ColorIndex = 2
End If
End Sub

Put =A3*3 in D3
Try values such as 12, 10 in A3

Al
 
Top