I bet you meant something more like:

Function check_formula(r As Range)
If r.hasFormula Then
check_formula = true
Else
check_formula = false
End If

End Function

anilsolipuram wrote:
>
> You have to write a userdefined function which can determine whether a
> cell has formula or not
>
> below is that funtion which determines whether a cell has formula or
> not, it takes the cell address as the parameter
>
> Function check_formula(r As Range)
> If r.Formula = "" Then
> check_formula = False
> Else
> check_formula = True
> End If
>
> End Function
>
> You have to paste the the above function in vba module.
>
> to use it in any cell type , =check_formula(b3) ' this will find
> whether cell b3 has formula or not , if formula is there it will return
> true, else false
>
> --
> anilsolipuram
> ------------------------------------------------------------------------
> anilsolipuram's Profile: http://www.excelforum.com/member.php...o&userid=16271
> View this thread: http://www.excelforum.com/showthread...hreadid=380978

--

Dave Peterson