Partager via


Objet VisWebPageSettings (Visio Save As Web)

Contient les paramètres de la page web.

Remarques

L’objet VisWebPageSettings sert de conteneur pour les propriétés d’une page web.

La plupart des 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 apparaît dans la barre de titre lorsqu’une page web est affichée dans un navigateur, correspond à la valeur dans la zone Titre de la page de la boîte de dialogue Définir le titre de la page (boîte > de dialogue Enregistrer sous Modifier le titre).

En outre, la propriété DispScreenRes correspond à la valeur sélectionnée dans la liste Moniteur cible sous l’onglet Avancé de la boîte de dialogue Enregistrer sous page web (boîte > de dialogue Enregistrer sous type de liste >Page web (*.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, vérifiez que vous disposez d’une référence à la DLL Enregistrer en tant que page web dans votre projet (dans la fenêtre Visual Basic Editor, choisissez Références dans le menu Outils , puis cochez la case Enregistrer en tant que bibliothèque de types web Microsoft Visio 15.0 dans la liste Références disponibles ).

Méthodes

Propriétés

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.