True if all cells in the range contain formulas; False if none of the cells in the range contains a formula; null otherwise. Read-only Variant.
Syntax
expression.HasFormula
expression A variable that represents a Range object.
Example
This example prompts the user to select a range on Sheet1. If every cell in the selected range contains a formula, the example displays a message.
Worksheets("Sheet1").Activate
Set rr = Application.InputBox(prompt:="Select a range on this worksheet", Type:=8)
If rr.HasFormula = True Then
MsgBox "Every cell in the selection contains a formula"
End If