Partager via


Propriété VisSaveAsWeb.WebPageSettings

Renvoie un objet VisWebPageSettings qui représente les paramètres de page web qui seront utilisés pour l’opération Enregistrer en tant que page web. En lecture seule.

Syntaxe

expression. WebPageSettings

Expression Expression qui renvoie un objet VisSaveAsWeb .

Remarques

Utilisez la propriété WebPageSettings pour obtenir un objet VisWebPageSettings . Vous pouvez ensuite utiliser l’objet VisWebPageSettings pour obtenir et définir les propriétés de votre page web.

Exemple

Cet exemple montre la façon la plus simple de créer une page web. Étant donné qu’aucune propriété de l’objet VisWebPageSettings n’est définie (à l’exception de la propriété TargetPath , qui est obligatoire), tous les paramètres par défaut s’appliquent et le document actif est enregistré.

Avant d’exécuter cette macro, remplacez par path un chemin cible valide sur votre ordinateur et remplacez par filename.htm le nom de fichier que vous souhaitez affecter à votre page 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

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.