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,1% France
Canada 7,7% Canada
Belgique 3,8% Belgique

Total:

117

Pays
018308664
Aujourd'hui: 65
Hier: 386
Cette semaine: 1.394
Semaine dernière: 2.467
Ce mois: 4.056