Microsoft KB Archive/97910

{|
 * width="100%"|

WD: Macro to Count Sections in a Document

 * }

Q97910

-

The information in this article applies to:


 * Microsoft Word for Windows, versions 2.0, 2.0a, 2.0a-CD, 2.0b, 2.0c, 6.0, 6.0a, 6.0c
 * Microsoft Word for Windows NT, version 6.0
 * Microsoft Word for Windows 95, versions 7.0, 7.0a
 * Microsoft Word for the Macintosh, versions 6.0, 6.0.1

-

SUMMARY
The WordBasic macro described in this article returns the total number of sections in your Microsoft Word document.

MORE INFORMATION
WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS ARTICLE IS AT YOUR OWN RISK. Microsoft provides this macro code &quot;as is&quot; without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose.

  Sub MAIN EndOfDocument x = SelInfo(2) MsgBox Str$(x) + &quot; section(s) in this document.&quot;, &quot;Section Count&quot;, 48 End Sub The syntax for SelInfo is as follows:

"n = SelInfo(Type)" There are 36 different arguments or types for the SelInfo function in Word versions 6.x and 7.x for Windows (30 different arguments in Word version 2.x for Windows).

Type 2 returns the section number containing the selection. To retrieve the total number of sections in a document, move the insertion point to the end of the document before you use the SelInfo function. SelInfo is not available in Word version 1.x for Windows.

For information about how to do this in Word 97 or later, please see the following article in the Microsoft Knowledge Base:

"Q170891 WD97: Macro to Count Sections in a Document"