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.
Spécifie une feuille de style en cascade (CSS) fournie par Microsoft Visio, ou une feuille que vous avez créée, qui est appliquée à la page web. Lecture-écriture.
Syntaxe
expression. feuille de style
expression expression qui renvoie un objet VisWebPageSettings .
Valeur renvoyée
String
Remarques
Une feuille de style peut être fournie par Visio ou créée par vous-même. Si vous stockez une feuille de style que vous créez dans le dossier suivant, elle apparaît dans la liste déroulante Feuille de style de l’onglet Avancé de la boîte de dialogue Enregistrer sous Page Web (onglet> BackstageButton Enregistrer> sous ListeEnregistrer sous Page>Web (*.htm ; *.html)>Publier>avancé) :
\ \ your_Visio_pathyour_language_ID\
Visio identifie les feuilles de style en effectuant une recherche de fichiers CSS dans le dossier du nom de votre ID de langue (par exemple, 1033).
Exemple
La macro Microsoft Visual Basic pour Applications (VBA) suivante montre comment utiliser la propriété feuille de style pour affecter la feuille de style acier (fournie par Visio) à la page web que vous créez.
Avant d’exécuter cette macro, remplacez-le path\filename.htm par un chemin d’accès cible valide sur votre ordinateur et le nom de fichier que vous souhaitez attribuer à votre page web. Remplacez your_Visio_path également et your_language_ID par le chemin d’accès aux feuilles de style Visio sur votre ordinateur, par exemple :
C :\Program Files\Microsoft Office\Visio14\1033...
Public Sub Stylesheet_Example()
Dim vsoSaveAsWeb As VisSaveAsWeb
Dim vsoWebSettings As VisWebPageSettings
Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject
Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings
With vsoWebSettings
.Stylesheet = "your_Visio_path\your_language_ID\Steel.css"
.TargetPath = "path\filename.htm"
End With
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.