Range.HasFormula (Excel)
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.
Dim booHasFormula As Boolean
booHasFormula = ActiveCell.HasFormula
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.
Dim booHasFormula As Boolean
booHasFormula = ActiveCell.HasFormula