Compartir a través de

Propiedad VisWebPageSettings.EndPage

  • Artículo

Especifica el número de página de la última página del intervalo al guardar un intervalo de páginas como página web. Lectura y escritura.

Sintaxis

expresión. EndPage

Expresión Expresión que devuelve un objeto VisWebPageSettings .

Valor devuelto

Long

Comentarios

El número de página de inicio se especifica en la propiedad StartPage .

El valor de la propiedad EndPage corresponde al valor del cuadro para de la pestaña General del cuadro de diálogo Guardar como página web (ficha >BackstageButtonGuardar como>guardar como tipo lista >Página web (*.htm;*.html)>Publicar).

Ejemplo:

La siguiente macro de Microsoft Visual Basic para Aplicaciones (VBA) muestra cómo usar la propiedad EndPage para guardar un rango de páginas en un dibujo (en este caso, de la página 2 a la página 3) como una página web en lugar del dibujo completo.

Esta macro supone que el dibujo actual de Visio contiene al menos tres páginas.

Antes de ejecutar esta macro, reemplace path\filename.htm por una ruta de acceso de destino válida en el equipo y el nombre de archivo que desea asignar a la página web.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.