Table of contents
TOC
Collapse the table of content
Expand the table of content

Pages.Count Property (Visio)

office 365 dev account|Last Updated: 6/12/2017
|
1 Contributor

Returns the number of objects in a collection. Read-only.

Syntax

expression . Count

expression A variable that represents a Pages object.

Return Value

Integer

Example

This Microsoft Visual Basic for Applications (VBA) macro shows how to use the Count property to iterate through a Documents collection. It displays the names of all the open Microsoft Visio documents in the Immediate window.


Public Sub Count_Example() 

 Dim intCounter As Integer 
 Dim vsoDocument As Visio.Document 

 For intCounter = 1 To Documents.Count 
 'Get the next open document. 
 Set vsoDocument = Documents.Item(intCounter) 

 'Print its name in the Immediate window. 
 Debug.Print vsoDocument.Name 
 Next intCounter 

End Sub
© 2017 Microsoft