Create a function for Excel: Is a cell formula cell
Function IsFormula(Check_Cell As Range) IsFormula = Check_Cell.HasFormula End Function =IsFormula(A1)