Macro ne marche pas avec les pieds de page

Résolu/Fermé

FredoRomano Messages postés 1 Date d'inscription vendredi 2 mai 2014 Statut Membre Dernière intervention 2 mai 2014 - 2 mai 2014 à 10:45
m@rina Messages postés 20027 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 18 avril 2024 - 2 mai 2014 à 19:03

Bonjour, je cherche à créer une macro qui me servira, pour des fichiers avec pieds de page, à effacer le pied de page.
J'ai essayé comme d'hab : affichage - macro - enreg une macro, puis je lui ai attribué un nom et un raccourci clavier, puis dans le fichier : insersion - pied de page - supprimer le pied de page. puis affichage - macro - arrêter l'enreg. puis j'ai tout bien enregistré, y compris la modif du modèle Normal.
Et ça ne fonctionne pas !
Merci de m'aider si possible

A voir également:

Macro ne marche pas avec les pieds de page
Supprimer une page word - Guide
Page d'accueil iphone - Guide
Macro word - Guide
Macro logiciel - Télécharger - Organisation
Traduire une page web - Guide

1 réponse

Réponse 1 / 1

m@rina Messages postés 20027 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 18 avril 2024 11 269
2 mai 2014 à 19:03

Bonjour

Essaie ceci :

Sub suppr_pdp()
'supprime tous les pdp
For Sect = 1 To ActiveDocument.Sections.Count
With ActiveDocument.Sections(Sect)
    .Footers(wdHeaderFooterPrimary).Range.Delete
    .Footers(wdHeaderFooterEvenPages).Range.Delete
End With
Next
End Sub

m@rina

Discussions similaires

[PIX] Commencer chaque poème sur une nouvelle page

[référencement] Ne pas être référencé

Discussions similaires

Newsletters