Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Contient les paramètres de la page web.
Remarques
L’objet VisWebPageSettings sert de conteneur pour les propriétés d’une page web.
De nombreuses propriétés de l’objet VisWebPageSettings correspondent aux paramètres disponibles dans la boîte de dialogue Enregistrer sous lorsqu’un utilisateur choisit l’onglet >FichierExporter>Modifier le type> de fichierPage Web (*.htm)>Enregistrer sous.
Par exemple, la propriété PageTitle, qui contient le titre qui s’affiche dans la barre de titre lorsqu’une page web est affichée dans un navigateur, correspond à la valeur de la zone Titre de la page dans la boîte de dialogue Définir le titre de la page (boîte > de dialogue Enregistrer sousModifier le titre).
De plus, la propriété DispScreenRes correspond à la valeur sélectionnée dans la liste Moniteur cible de l’onglet Avancé de la boîte de dialogue Enregistrer sous page Web (boîte > de dialogue Enregistrer sous > Liste Type de fichier PageWeb (*.htm ;*.html)>Publier).
Lorsque vous souhaitez créer une page Web, utilisez la propriété WebPageSettings de l’objet VisSaveAsWeb pour obtenir une référence à l’objet VisWebPageSettings , que vous pouvez utiliser pour définir les propriétés de la page Web, comme illustré dans l’exemple suivant.
Public Sub VisWebPageSettingsObject_Example()
Dim vsoWebSettings As VisWebPageSettings
Dim vsoSaveAsWeb As VisSaveAsWeb
' Query Visio for the VisSaveAsWeb object.
Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject
' Get a WebPageSettings object.
Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings
With vsoWebSettings
' Set the title that is displayed in the browser's title bar.
.PageTitle = "AccountingDeptOrgChart082501"
' Prevent dialog boxes from appearing in the user interface.
.QuietMode = True
End With
' If you don't call the AttachToVisioDoc method to
' identify a specific document, Visio saves the
' active document by default.
vsoSaveAsWeb.CreatePages
End Sub
Remarque
Pour afficher la classe VisWebPageSettings dans l’Explorateur d’objets, assurez-vous que vous disposez d’une référence à la DLL Enregistrer sous page Web dans votre projet (dans la fenêtre Visual Basic Editor, choisissez Références dans le menu Outils, puis cochez la case case activée Enregistrer sous Bibliothèque de types Web de Microsoft Visio 15.0 dans la liste Références disponibles).
Méthodes
Propriétés
- AltFormat
- DispScreenRes
- EndPage
- FormatCount
- NavBar
- OpenBrowser
- PageTitle
- PanAndZoom
- PriFormat
- PropControl
- QuietMode
- Search
- SecFormat
- SilentMode
- StartPage
- StoreInFolder
- Stylesheet
- TargetPath
- ThemeName
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.