Recherche

Si le document ne contient qu'une section, si, de plus, les options Pages paires et impaires différentes et Première page différente ne sont pas sélectionnée, c'est tout simple : Onglet Insertion => Pied de page => Supprimer.

Le problème se complique pour un document plus élaboré qui contient de nombreuses sections. Dans ce cas, le mieux est d'utiliser une macro.

Sub suppr()
For x = 1 To ActiveDocument.Sections.Count
ActiveDocument.Sections(x).Footers(wdHeaderFooterPrimary).Range.Delete
Next
End Sub


Si l'option Pages paires et impaires différentes est sélectionnée, vous ajouterez la ligne suivante :

ActiveDocument.Sections(x).Footers(wdHeaderFooterEvenPages).Range.Delete


Si l'option Première page différente est sélectionnée, vous ajouterez la ligne suivante :

ActiveDocument.Sections(x).Footers(wdHeaderFooterFirstPage).Range.Delete


Si vous souhaitez supprimer les en-têtes, vous utiliserez les mêmes macros, mais vous remplacerez les "Footers" par "Headers". Exemple :

ActiveDocument.Sections(x).Headers(wdHeaderFooterPrimary).Range.Delete

 

 

Statistiques

France 72,9% France
Canada 5,6% Canada
Belgique 3,7% Belgique

Total:

150

Pays
018431795
Aujourd'hui: 5
Hier: 443
Cette semaine: 1.315
Semaine dernière: 2.832
Ce mois: 1.315