Check whether a cell has a formula, eg =hasformula(A1)

Function HasFormula(rCell As Range) As Boolean
 HasFormula = rCell.HasFormula
End Function


© Copyright andrewsexceltips.net All Rights Reserved.