/ / Créer un pied de page avant d’imprimer dans Excel VBA

Créer un pied de page avant d’imprimer dans Excel VBA

Ci-dessous, nous examinerons un programme en Excel VBA cette crée un pied de page avant impression un classeur.

Créez un événement Workbook BeforePrint. Le code ajouté à l'événement Workbook BeforePrint sera exécuté par Excel VBA avant l'impression d'un classeur.

1. Ouvrez Visual Basic Editor.

2. Double-cliquez sur Ce classeur dans l'Explorateur de projet.

3. Choisissez Classeur dans la liste déroulante de gauche. Choisissez BeforePrint dans la liste déroulante de droite.

Classeur BeforePrint Event in Excel VBA

4. Pour créer un pied de page, ajoutez la ligne de code suivante à l'événement Workbook BeforePrint:

ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName

Remarque: l'objet PageSetup contient tous les attributs de mise en page (pied de page gauche, marge inférieure, format de papier, marge de gauche, etc.) en tant que propriétés.

5. Testez le programme en imprimant votre classeur.

Résultat:

Bas de page

Lisez aussi: