How to Compare formulas???

Hi, This UDF seems to work:-
Right click sheet tab, select, "View Code"
VB Window appears, Click "Insert","Module" on toolbar.
Paste Code in New Window.
Enter Function in sheet as :- oFm(rng1,rng2)
NB:-(rng1/2 = Your cell selection)
Return Value = "True", "False" or Nothing if there is No formula

Function oFm(rng1 As Range, rng2 As Range) As String 
If rng1.HasFormula = True And rng1.Formula = rng2.Formula Then
    oFm = "True"
ElseIf rng1.HasFormula = False Then
    oFm = ""
Else
    oFm = "False"
End If
End Function

Regards Mick

You my friend are an absolute legend, thank you.

I can now also use this in the conditional formatting.