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.