Get number of Page Breaks in Excel

Hi,

I'm trying to findout the number of Partial Horizontal Page Breaks.

I've found the following in the Help, but it doesn't seem to work: -

Code:

---

For Each pb in Worksheets(1).HPageBreaks
    If pb.Extent = xlPageBreakFull Then
        cFull = cFull + 1
    Else
        cPartial = cPartial + 1
    End If
Next
MsgBox cFull & " full-screen page breaks, " & cPartial & _
    " print-area page breaks"

---

The first question I have is is 'pb' declared as HPageBreak?

I've tried the code, but it doesn't seem to loop :confused:

Can anyone point me in the right direction?

Regards