Sum formulas and none formulas

[Nighteg]

Hi.
I have a list of names. Some of them are text, others are formulas (hyperlinks, in blue).
I need the sums of the numbers in column B for regulars, and for the hyperlinked.
What's the quickest way to do it?
Thanks!
Sample.xlsx

[Debraj Roy]

Hi Nighteg..

None of your Look-A-Like HYLERLINK cells are actual LINK..

Do you want sum according to FontColor & Underline..
Or sum according to Link & Non-Link Text..

[Nighteg]

Hi Debraj.
In my workbook they are
So please sum according to Link and non-link.
Thanks.

[Debraj Roy]

Hi Nighteg..

try this..

Sub Deb()
    Dim c As Range, s As String
    On Error Resume Next
    For Each c In Range("A4:A9")
        s = c.Hyperlinks(1).SubAddress
            If Err = 0 Then
                HSUM = HSUM + c.Offset(, 1)
            Else
                nhsum = nhsum + c.Offset(, 1)
            End If
        Err.Clear
    Next
    MsgBox "SUM OF Hypelink :" & HSUM & Chr(10) & "Sum Of NonHyperlink :" & nhsum
End Sub

In the meanwhile.. trying to figure out if possible through FORMULA, or NamedRange or Get.CELL..

[Nighteg]

Thanks a lot, but i need it with a formula. I have lots of tabs like these, and the range varies from 10, to over 200, and changes every month. I'd have to edit the macro for each one of them

[Debraj Roy]

If you can upload a sample file, then I can help to create a macro for the same..

[Nighteg]

Let's try it this way: is there any formula in excel that checks if a cell contains a formula (and gives true or false)?
p.s. i've uploaded a sample with the hyperlinks.