Ci-dessous, nous examinerons un programme en Excel VBA ce crée un pied de page avant l'impression un classeur.
Créez un événement BeforePrint de classeur. Le code ajouté à l'événement Workbook BeforePrint sera exécuté par Excel VBA avant d'imprimer un classeur.
1. Ouvrez l'éditeur Visual Basic.
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.
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 gauche, etc.) en tant que propriétés.
5. Testez le programme en imprimant votre classeur.
Résultat: