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.
Especifica o formato de saída secundário da página Web. Leitura/gravação.
Sintaxe
expressão. SecFormat
expressão Uma expressão que devolve um objeto VisWebPageSettings .
Valor de retorno
String
Comentários
O formato de saída secundário é utilizado se o browser não suportar o formato de saída principal. Por exemplo, se o formato primário for XAML e o plug-in do browser Silverlight necessário não estiver instalado, a saída da página Web utiliza o formato secundário.
O formato de saída principal é especificado pela propriedade PriFormat . Para obter informações sobre que browsers são compatíveis com formatos selecionados, consulte a propriedade AltFormat .
Os valores possíveis para a propriedade SecFormat são os seguintes:
- PNG (Portable Network Graphics), a predefinição
- JPG (JPEG File Interchange Format)
- GIF (Graphics Interchange Format)
Este valor corresponde ao valor selecionado na lista abaixo da caixa de marcar Fornecer formato alternativo para browsers mais antigos (se estiver selecionado) no separador Avançadas da caixa de diálogo Guardar como Página Web (separador >BackstageButtonGuardar Como>Guardar com o tipo de página >Web (*.htm;*.html)>Publicar>Avançadas).
Exemplo
A seguinte macro mostra como utilizar a propriedade SecFormat para definir o valor de formato secundário como JPG para browsers que não suportam o formato primário de XAML (a predefinição).
Antes de executar esta macro, substitua por path\filename.htm um caminho de destino válido no seu computador e o nome de ficheiro que pretende atribuir à sua página Web.
Public Sub SecFormat_Example()
Dim vsoSaveAsWeb As VisSaveAsWeb
Dim vsowebSettings As VisWebPageSettings
Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject
Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings
With vsoWebSettings
.AltFormat = True
.SecFormat = "JPG"
.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.