Partager via


Propriété Document.HeaderFooterFont (Visio)

Spécifie la police utilisée pour le texte de l’en-tête et du pied de page. Lecture-écriture.

Syntaxe

expression. HeaderFooterFont

Expression Variable qui représente un objet Document .

Valeur renvoyée

IFontDisp

Remarques

COM fournit une implémentation standard d’un objet Font avec l’interface IFontDisp au-dessus de la prise en charge de polices par le système sous-jacent. L’interface IFontDisp expose les propriétés d’un objet police et est implémentée dans la bibliothèque de types stdole en tant qu’objet StdFont qui peut être créé dans Microsoft Visual Basic. La bibliothèque de types stdole est automatiquement référencée à partir de tous les projets Visual Basic pour Applications (VBA) dans Microsoft Visio.

Pour obtenir des informations à propos de l’objet StdFont qui prend en charge l’interface IFontDisp :

  1. Dans le groupe Code de l’onglet Développeur , cliquez sur Visual Basic.

  2. Dans le menu Affichage, cliquez sur Explorateur d’objets.

  3. Dans la liste Projet/bibliothèque, cliquez sur stdole.

  4. Sous Classes, examinez la classe nommée StdFont.

Pour plus d’informations sur l’interface IFontDisp, reportez-vous au kit de développement Platform SDK sur le site Web MSDN (Microsoft Developer Network) de Microsoft.

Définir la propriété HeaderFooterFont équivaut à définir des valeurs dans la zone Police de la boîte de dialogue Choisir une police (cliquez sur l’onglet Fichier , sur Imprimer, sur Aperçu avant impression, dans le groupe Aperçu , sur En-tête & Pied de page, puis sur Choisir une police).

Exemple

L’exemple de code suivant indique comment utiliser la propriété HeaderFooterFont pour obtenir une référence pour l’objet actif Font et appliquer au document la police de texte Arial non gras.

 
Public Sub HeaderFooterFont_Example()  
 
    Dim objStdFont As StdFont 
 
    Set objStdFont = ThisDocument.HeaderFooterFont  
    objStdFont.Name = "Arial"  
    objStdFont.Bold = False 
    Set ThisDocument.HeaderFooterFont = objStdFont  
 
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.