How many formula
For a single sheet yes, press F5, select special then formulas, now right
click in the status bar to the far right and select count. Otherwise you
need to use a macro
************************************************** ****
Option Explicit
Sub CountFormula()
Dim sh As Worksheet
Dim cell As Range
Dim Count As Integer
For Each sh In ActiveWorkbook.Sheets
For Each cell In sh.UsedRange
If cell.HasFormula Then
Count = Count + 1
End If
Next cell
Next sh
MsgBox "This workbook has " & Count & " formulas"
End Sub
************************************************** ***
--
Regards,
Peo Sjoblom
"Andy the yeti" wrote in message
...
Hi all,
Is there a way to count up how many formulae there are in workbook across
all the tabs?
Many thanks
Andy
|