VisWebPageSettings.EndPage-Eigenschaft

Gibt die Seitenzahl der letzten Seite im Bereich an, wenn Sie einen Seitenbereich als Webseite speichern. Lese-/Schreibzugriff.

Syntax

Ausdruck. EndPage

Ausdruck Ein Ausdruck, der ein VisWebPageSettings-Objekt zurückgibt.

Rückgabewert

Long

Hinweise

Die Startseitennummer wird in der StartPage-Eigenschaft angegeben.

Der Wert der EndPage-Eigenschaft entspricht dem Wert im Feld an auf der Registerkarte Allgemein des Dialogfelds " Als Webseite speichern " (Registerkarte BackstageButton>Speichern unter>Listentyp>-Webseite (*.htm;*.html)>Veröffentlichen).

Beispiel

Das folgende VBA-Makro (Microsoft Visual Basic for Applications) zeigt, wie Sie die EndPage-Eigenschaft verwenden, um einen Bereich von Seiten in einer Zeichnung (in diesem Fall von Seite 2 bis Seite 3) als Webseite anstelle der vollständigen Zeichnung zu speichern.

Bei diesem Makro wird davon ausgegangen, dass die aktuelle Visio-Zeichnung mindestens drei Seiten enthält.

Ersetzen Sie vor dem Ausführen dieses Makrospath\filename.htm durch einen gültigen Zielpfad auf Ihrem Computer und den Dateinamen, den Sie Ihrer Webseite zuweisen möchten.

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 und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.