Determining How Many Styles are Available

Summary: Got a macro that processes or uses styles? You definitely need to know how many styles Word has available in the document. Use the Count property of the Styles collection to determine the figure. (This tip works with Microsoft Word 97, Word 2000, Word 2002, Word 2003, and Word 2007.)

You can determine the number of styles available in a document (when creating a VBA macro) by using the Count property with the Styles object. This is done using the following syntax:

x = ActiveDocument.Styles.Count

where x is the variable you can then use in other VBA macro lines. Note that this function indicates how many have been defined, not how many of those are actually in use. This means that built-in styles are also counted. If you want to exclude built-in styles, you can do an actual iterative count of the styles in this manner:

x = 0
For Each objStyle in ActiveDocument.Styles
    If Not objStyle.BuiltIn Then x = x + 1
Next objStyle

Tip #803 applies to Microsoft Word versions: 97 | 2000 | 2002 | 2003 | 2007

Take Control! Master the real power behind Word! Successfully master the secrets of powerful formatting and create documents that stand out from the rest. Best of all, you can create documents that are easy to maintain and quick to change.

Check out WordTips: Styles and Templates today!

Helpful Links

Newest Tips

Subscribe

RSS Feeds

Determining How Many Styles are Available