Comment imprimer un document Word sans en-tête ni pied de page ?
S'il y a des en-têtes et des pieds de page dans votre document Word, lors de l'impression de ce document, les en-têtes et les pieds de page seront également imprimés par défaut. Cependant, parfois, vous n'avez pas besoin que les en-têtes et les pieds de page soient imprimés. Dans ce cas, la méthode décrite dans cet article peut vous aider.
Imprimer un document Word sans en-tête ni pied de page à l'aide d'un code VBA
Imprimer un document Word sans en-tête ni pied de page à l'aide d'un code VBA
Pour imprimer le fichier Word sans en-tête ni pied de page, le code VBA suivant peut vous être utile, veuillez procéder comme suit :
1. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic for Applications.
2. Ensuite, cliquez sur Insérer > Module, copiez et collez le code ci-dessous dans le module vide qui s'est ouvert :
Code VBA : Imprimer un document Word sans en-tête ni pied de page :
Sub PrintDocWithoutHeaderFooter()
Call SetHeaderAndFooter(True)
Options.PrintHiddenText = False
Dialogs(wdDialogFilePrint).Show
Call SetHeaderAndFooter(False)
End Sub
Sub SetHeaderAndFooter(xBool As Boolean)
Dim xSel As Selection
For Each s In ActiveDocument.Sections
s.Headers(wdHeaderFooterEvenPages).Range.Font.Hidden = xBool
s.Headers(wdHeaderFooterFirstPage).Range.Font.Hidden = xBool
s.Headers(wdHeaderFooterPrimary).Range.Font.Hidden = xBool
s.Footers(wdHeaderFooterEvenPages).Range.Font.Hidden = xBool
s.Footers(wdHeaderFooterFirstPage).Range.Font.Hidden = xBool
s.Footers(wdHeaderFooterPrimary).Range.Font.Hidden = xBool
Next s
End Sub
3. Après avoir inséré le code ci-dessus, appuyez sur la touche F5 pour l'exécuter, et une boîte de dialogue d'impression apparaîtra. Vous devez ensuite configurer les paramètres d'impression selon vos besoins, voir capture d'écran :
4. Ensuite, cliquez sur OK pour démarrer l'impression, le document sera immédiatement imprimé sans l'en-tête ni le pied de page.
Meilleurs outils de productivité pour Office
Kutools pour Word - Élevez votre expérience Word avec plus de 100 fonctionnalités remarquables !
🤖 Fonctionnalités AI de Kutools : Assistant IA / Assistant en Temps Réel / Super Polonais (Conserver le format) / Super Traduire (Conserver le format) / Rédaction IA / Correction AI...
📘 Maîtrise des documents : Diviser les pages / Fusionner les documents / Exporter la sélection dans divers formats (PDF/TXT/DOC/HTML...) / Conversion en lot vers PDF...
✏ Édition de contenu : Recherche et remplacement en lot dans plusieurs fichiers / Redimensionner toutes les images / Transposer les lignes et colonnes du tableau / Convertir le tableau en texte...
🧹 Nettoyage sans effort : Éliminer les espaces supplémentaires / Sauts de section / Zones de texte / Liens hypertexte / Pour plus d'outils de suppression, rendez-vous dans le groupe Supprimer...
➕ Insertion créative : Insérer des séparateurs de milliers / Cases à cocher / Boutons radio / Code QR / Code-barres / Images multiples / Découvrez plus dans le groupe Insérer...
🔍 Sélections précises : Identifier des pages spécifiques / Tableaux / Formes / Paragraphes de titre / Améliorez la navigation avec plus de fonctionnalités de sélection...
⭐ Améliorations étoilées : Naviguer vers n'importe quel emplacement / Insertion automatique de texte répétitif / Basculer entre les fenêtres de document /11 outils de conversion...
Meilleurs outils de productivité pour Office
Kutools pour Word - 100+ outils pour Word
- 🤖 Fonctionnalités AI de Kutools : Assistant IA / Assistant en Temps Réel / Super Polonais / Super Traduire / Rédaction IA / Correction AI
- 📘 Maîtrise des documents : Diviser les pages / Fusionner les documents / Conversion en lot vers PDF
- ✏ Édition de contenu : Recherche et remplacement en lot / Redimensionner toutes les images
- 🧹 Nettoyage sans effort : Supprimer les espaces supplémentaires / Supprimer les sauts de section
- ➕ Insertion créative : Insérer des séparateurs de milliers / Insérer des cases à cocher / Créer des codes QR