This topic has not yet been rated - Rate this topic

WebNavigationBarHyperlinks.Count Property (Publisher)

Office 2013

Other Versions

Office 2010

Returns a Long that represents the number of items in the specified collection.

Syntax

expression .Count

expression A variable that represents a WebNavigationBarHyperlinks object.

Example

This example displays the number of pages in the active document.

VBA

Sub CountNumberOfPages() 
 MsgBox "Your publication contains " & _ 
 ActiveDocument.Pages.Count & " page(s)." 
End Sub

This example displays the number of shapes in the active document.

Sub CountNumberOfShapes() 
 Dim intShapes As Integer 
 Dim pg As Page 
 
 For Each pg In ActiveDocument.Pages 
 intShapes = intShapes + pg.Shapes.Count 
 Next 
 
 MsgBox "Your publication contains " & intShapes & " shape(s)." 
End Sub

Did you find this helpful? Yes No

Not accurate

Not enough depth

Need more code examples

(1500 characters remaining)

Community Additions

ADD