EndPage Property

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 (on the File menu, click Save as Web Page, and then click 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 Web page 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 Web page.

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