Propriété Document.FooterLeft (Visio)
Récupère ou définit la chaîne de texte qui apparaît à gauche du pied de page d’un document. Lecture-écriture.
Syntaxe
expression. FooterLeft
Expression Variable qui représente un objet Document .
Valeur renvoyée
String
Remarques
Vous pouvez également définir cette valeur dans la zone Gauche sous Pied de page dans la boîte de dialogue En-tête et pied de page (cliquez sur l’onglet Fichier , sur Imprimer, sur Aperçu avant impression, puis dans le groupe Aperçu , cliquez sur En-tête & Pied de page).
La chaîne renvoyée par FooterLeft et la chaîne pour laquelle vous définissez FooterLeft peuvent toutes deux contenir des codes d’échappement représentant des données. Ces codes d’échappement peuvent être concaténés avec un autre texte.
Vous trouverez ci-dessous une liste de codes d’échappement valides pour les en-têtes et les pieds de page d’un document.
Code d'échappement | Description |
---|---|
&p | Numéro de page |
&t ou &T | Heure actuelle |
&d (version courte) ou &D (version longue) | Date actuelle |
&& | Esperluette |
&e | Extension de nom de fichier |
&f | Nom de fichier |
&f&e | Nom et extension de fichier |
&n | Nom de la page |
&P | Total des pages imprimées |
Exemple
La macro suivante indique comment placer une chaîne contenant la date actuelle à gauche du pied de page d’un document. Après avoir exécuté cette macro, si la date est 04.05.07, la partie gauche du pied de page contient : « jeudi 04.05.07 ».
Sub FooterLeft_Example()
Dim strFooter as String
'Build the footer string.
strFooter = "The date is " & "&D"
'Set the footer of the current document.
ThisDocument.FooterLeft = strFooter
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.