VBA?

Private Sub Worksheet_Change(ByRef Target As Range)
If Not Intersect(Range("A2"),Target) Is Nothing Then
If Target.Value < "" Then
Range("A3").Value = "my value"
End If
End If
End Sub

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Nirel" wrote in message
...
This is the situation: cell A2 is blank. Should it change to any value, I
want cell A3 to get a certain value, but I don't want cell A3 to contain
any
formula.
Is there any solution?