Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Create a function for Excel

Function IsFormula(Check_Cell As Range)       IsFormula = Check_Cell.HasFormula      End Function =IsFormula(A1)