How can I find the number of formula in an excel sheet?

TIA

Sub NumFormulae()
Dim oCell as Range
Dum cNumFormulae As Long

For Each oCell In Activesheet.UsedRange
If oCell.HasFormula Then
cNumFormulae = cNumFormulae + 1
End If
Next oCell
MsgBox cNumFormulae
End Sub

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"awakening2lite" wrote in message
...
How can I find the number of formula in an excel sheet?

TIA

Showing my ignorance, here. I do not understand this. I do not work in VB.
But, thank you for trying to help.

"Bob Phillips" wrote:

Sub NumFormulae()
Dim oCell as Range
Dum cNumFormulae As Long

For Each oCell In Activesheet.UsedRange
If oCell.HasFormula Then
cNumFormulae = cNumFormulae + 1
End If
Next oCell
MsgBox cNumFormulae
End Sub

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"awakening2lite" wrote in message
...
How can I find the number of formula in an excel sheet?

TIA

Press F5, select special, select formulas and press enter, right in the
statusbar to the right and select count


--
Regards,

Peo Sjoblom



"awakening2lite" wrote in message
...
How can I find the number of formula in an excel sheet?

TIA

What am I doing wrong. I tried entering F5 and followed instruction in both
clicking a cell and clicking the status bar but I do not get any result.

"Peo Sjoblom" wrote:

Press F5, select special, select formulas and press enter, right in the
statusbar to the right and select count


--
Regards,

Peo Sjoblom



"awakening2lite" wrote in message
...
How can I find the number of formula in an excel sheet?

TIA

start by doing this, in the statusbar at the bottom right click where you
see NUM, right click then select count

then do F5, special and formulas, that will select all formulas in the
active sheet and at the bottom right you should see the count of them


--
Regards,

Peo Sjoblom



"awakening2lite" wrote in message
...
What am I doing wrong. I tried entering F5 and followed instruction in
both
clicking a cell and clicking the status bar but I do not get any result.

"Peo Sjoblom" wrote:

Press F5, select special, select formulas and press enter, right in the
statusbar to the right and select count


--
Regards,

Peo Sjoblom



"awakening2lite" wrote in
message
...
How can I find the number of formula in an excel sheet?

TIA

A Million Thanks, Peo! It worked perfectly!

"Peo Sjoblom" wrote:

start by doing this, in the statusbar at the bottom right click where you
see NUM, right click then select count

then do F5, special and formulas, that will select all formulas in the
active sheet and at the bottom right you should see the count of them


--
Regards,

Peo Sjoblom



"awakening2lite" wrote in message
...
What am I doing wrong. I tried entering F5 and followed instruction in
both
clicking a cell and clicking the status bar but I do not get any result.

"Peo Sjoblom" wrote:

Press F5, select special, select formulas and press enter, right in the
statusbar to the right and select count


--
Regards,

Peo Sjoblom



"awakening2lite" wrote in
message
...
How can I find the number of formula in an excel sheet?

TIA