cell value

T

Tim

How would I chec if a particular cell contains a formula
or value. If teh cell contains the value, I would like
to exit the sub, but if there is a formula I would like
the procedure to run.

Thanks in Advance
 
R

Ron de Bruin

Try this Tim

Sub test()
If Range("D6").HasFormula Then
MsgBox "formula"
Else
MsgBox "not"
End If
End Sub
 
Top