Bienvenue 

sur les faqs Word & PowerPoint

Une question ? Cliquez ici.

 Un exemple à télécharger ? Cliquez ici.

 

Word 365 : Vous saurez tout !

Auteur sur XinXii

Pour tout connaître sur Word

8,90 €

 

 

Voici une macro qui masque le pied de page pour l'impression puis le rétablit ensuite.

Cela est très pratique lorsqu'on a des pieds de page en couleurs, et qu'on souhaite imprimer des brouillons plus rapidement et sans gâcher trop d'encre ou de toner.

 

Sub PiedDePageMasque()
' macro écrite par Geo
' Passer momentanément le Pied de Page en texte masqué.
'-- Entrer dans le pied de page
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter
'-- Mettre le curseur en début de ligne
Selection.HomeKey Unit:=wdStory
'-- Sélectionner le pied de page
Selection.EndKey Unit:=wdLine, Extend:=wdExtend
'-- Activer le mode texte caché
With Selection.Font
.Hidden = True
End With
'-- Revenir dans le document
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
'-- L'imprimer
ActiveDocument.PrintOut
'-- Remettre le pied de page en "mode visible"
'-- Voir plus haut pour les remarques.
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter
Selection.HomeKey Unit:=wdStory
Selection.EndKey Unit:=wdLine, Extend:=wdExtend
With Selection.Font
.Hidden = False
End With
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
End Sub

Statistiques

Aujourd'hui1687
Hier1383
Cette semaine1687
Ce mois34950
Total depuis 200410770358

49
visiteurs actuellement en ligne