Share via

Propiedad Document.HeaderFooterFont (Visio)

  • Artículo

Especifica la fuente utilizada para el texto del encabezado y del pie de página. Lectura y escritura.

Sintaxis

expresión. HeaderFooterFont

Expresión Variable que representa un objeto Document .

Valor devuelto

IFontDisp

Observaciones

El Modelo de objetos componentes (COM) proporciona una implementación estándar de un objeto Font con la interfaz IFontDisp por encima del soporte de fuentes del sistema subyacente. La interfaz IFontDisp expone las propiedades de un objeto de fuente y se implementa en la biblioteca de tipos stdole como un objeto StdFont que se puede crear en Microsoft Visual Basic. A dicha biblioteca se hace referencia automáticamente en todos los proyectos de Visual Basic para Aplicaciones (VBA) de Microsoft Visio.

Para obtener información sobre el objeto StdFont que admite la interfaz IFontDisp:

  1. En el grupo Código de la pestaña Desarrollador , haga clic en Visual Basic.

  2. En el menú Ver, haga clic en Examinador de objetos.

  3. En la lista Proyecto/Biblioteca, haga clic en stdole.

  4. En la sección Clases, examine la clase denominada StdFont.

Para obtener más información sobre la interfaz IFontDisp, vea Microsoft Platform SDK en MSDN, el sitio Web de Microsoft Developer Network.

Establecer la propiedad HeaderFooterFont es el equivalente a establecer valores en el cuadro Fuente del cuadro de diálogo Elegir fuente (haga clic en la pestaña Archivo , haga clic en Imprimir, en Vista previa de impresión, en el grupo Vista previa , haga clic en Encabezado & pie de páginay, a continuación, haga clic en Elegir fuente).

Ejemplo

El código de ejemplo siguiente muestra cómo utilizar la propiedad HeaderFooterFont para obtener una referencia al objeto Font actual y establecer la fuente del texto del documento en Arial sin negrita.

 
Public Sub HeaderFooterFont_Example()  
 
    Dim objStdFont As StdFont 
 
    Set objStdFont = ThisDocument.HeaderFooterFont  
    objStdFont.Name = "Arial"  
    objStdFont.Bold = False 
    Set ThisDocument.HeaderFooterFont = objStdFont  
 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.