VisWebPageSettings.EndPage property

Specifies the page number of the last page in the range when you save a range of pages as a webpage. Read/write.

Syntax

expression.EndPage

expression An expression that returns a VisWebPageSettings object.

Return value

Long

Remarks

The start page number is specified in the StartPage property.

The EndPage property value corresponds to the value in the to box on the General tab of the Save As Web Page dialog box (BackstageButton tab > Save As > Save as type list > Web Page (*.htm;*.html) > Publish).

Example

The following Microsoft Visual Basic for Applications (VBA) macro shows how to use the EndPage property to save a range of pages in a drawing (in this case, from page 2 to page 3) as a webpage instead of the complete drawing.

This macro assumes that the current Visio drawing contains at least three pages.

Before running this macro, replace path\filename.htm with a valid target path on your computer and the filename that you want to assign to your webpage.

Public Sub EndPage_Example() 
 Dim vsoSaveAsWeb As VisSaveAsWeb 
 Dim vsoWebSettings As VisWebPageSettings 
 
 Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject 
 Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings 
 
 With vsoWebSettings 
 .StartPage = 2 
 .EndPage = 3 
 .TargetPath = "path\filename.htm" 
 End With 
 
 vsoSaveAsWeb.CreatePages 
End Sub

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.