Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Devolve um objeto VisWebPageSettings que representa as definições da página Web que serão utilizadas para a operação Guardar como Página Web. Somente leitura.
Sintaxe
expressão. WebPageSettings
expressão Uma expressão que devolve um objeto VisSaveAsWeb .
Comentários
Utilize a propriedade WebPageSettings para obter um objeto VisWebPageSettings . Em seguida, pode utilizar o objeto VisWebPageSettings para obter e definir as propriedades da sua página Web.
Exemplo
Este exemplo mostra a forma mais simples de criar uma página Web. Uma vez que não estão definidas propriedades do objeto VisWebPageSettings (exceto a propriedade TargetPath , que é necessária), aplicam-se todas as predefinições e o documento ativo é guardado.
Antes de executar esta macro, substitua por path um caminho de destino válido no seu computador e substitua filename.htm pelo nome de ficheiro que pretende atribuir à sua página Web.
Public Sub WebPageSettings_Example()
Dim vsoSaveAsWeb As VisSaveAsWeb
Dim vsowebSettings As VisWebPageSettings
Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject
Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings
vsoWebSettings.TargetPath = "path\filename.htm"
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.