How Many Paragraphs use a Particular Style?

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Frankbelly - 06 Dec 2006 04:00 GMT

I think Word 2003 handles this better, but I'm using Word 2000 and I'm trying
to figure out how many paragraphs are using a particular style. Is there an
easy way to get a number value for how many paragraphs in the active document
are styled under a certain style name?

Thanks for any help.

Reply to this Message

Greg Maxey - 06 Dec 2006 04:08 GMT

Sub ScratchMacro()
Dim oPar As Paragraph
Dim i As Long
For Each oPar In ActiveDocument.Range.Paragraphs
If oPar.Style = "Normal" Then
i = i + 1
End If
Next
MsgBox i
End Sub

Signature

Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.

> I think Word 2003 handles this better, but I'm using Word 2000 and
> I'm trying to figure out how many paragraphs are using a particular
[quoted text clipped - 3 lines]
>
> Thanks for any help.

Reply to this Message