Propriedade VisWebPageSettings.StartPage
Especifica o número da página da primeira página no intervalo quando você salva um intervalo de páginas de documento como uma página da Web. Leitura/gravação.
Sintaxe
expressão. Startpage
Expressão Uma expressão que retorna um objeto VisWebPageSettings .
Valor de retorno
Long
Comentários
O número da página final é especificado na propriedade EndPage .
O valor da propriedade StartPage corresponde ao valor na caixa De na guia Geral da caixa de diálogo Salvar Como Página da Web (guia >BackstageButtonSalvar como>Salvar como página Da Web da lista > de tipos (*.htm;*.html)>Publicar).
Exemplo
A macro do Microsoft Visual Basic for Applications (VBA) a seguir mostra como usar a propriedade StartPage para salvar um intervalo de páginas em um desenho (nesse caso, da página 2 à página 3) como uma página da Web em vez do desenho completo.
Essa macro pressupõe que o desenho atual do Microsoft Visio contenha pelo menos três páginas.
Antes de executar essa macro, substitua path\filename.htm
por um caminho de destino válido em seu computador e pelo nome de arquivo que você deseja atribuir à sua página da Web.
Public Sub StartPage_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
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.