Si vous souhaitez insérer certaines informations dans l’en-tête / pied de page de la feuille de calcul comme le nom du fichier / chemin du fichier ou la date actuelle ou le numéro de page, vous pouvez le faire en utilisant le code ci-dessous. S’il ne s’agit que d’une seule feuille de calcul, vous pouvez le faire manuellement, mais si ce sont plusieurs feuilles ou toutes les feuilles du classeur qui ont besoin de ces informations pour être remplies, vous pouvez le faire en utilisant une simple macro / code vba.

Cet exemple de macro insérera un en-tête / pied de page dans chaque feuille de calcul du classeur actif. Il insérera également le chemin d’accès complet au classeur.

Option Explicit

Sub InsertHeaderFooter()

Dim wsAs Worksheet

Application.ScreenUpdating = False

Each wsInThisWorkbook.Worksheets

With ws.PageSetup

.LeftHeader = “Company Name:”

.CenterHeader = “Page &P of &N”

.RightHeader = “Printed &D &T”

.LeftFooter = “Path : “ &ActiveWorkbook.Path

.CenterFooter = “Workbook Name: & F”

.RightFooter = “Sheet: &A”

End With

Next ws

Set ws = Nothing

Application.ScreenUpdating = True

End Sub

Pour copier ce code dans votre classeur, appuyez sur Alt + F11 sur votre clavier.

Ensuite, sur le côté gauche, vous verrez des objets Microsoft Excel. Faites un clic droit et sélectionnez Insérer. Cliquez ensuite sur Module et copiez ce code dans la fenêtre de code à droite.

Décomposons chaque partie du code – Nous commençons par l’instruction Dim habituelle où nous déclarons les variables.

Dans ce cas, nous n’avons qu’une seule variable – ws pour la feuille de calcul. Ensuite, nous désactivons la mise à jour de l’écran.

Maintenant, dans la boucle FOR, nous parcourons chaque feuille de calcul du classeur qui contient la macro. Et nous configurons chaque paramètre dans la mise en page. & P, & N, & D, & T, & F et & A sont certains codes de format qui peuvent être appliqués aux en-têtes et pieds de page. & P imprime le numéro de page. & N imprime le nombre total de pages dans le document. & D imprime la date actuelle. & T imprime l’heure actuelle. & F imprime le nom du document et & A imprime le nom de l’onglet du classeur.

À la fin, nous définissons la feuille de calcul sur rien, libérons l’objet et activons la mise à jour de l’écran.

Voici 2 photos. Le 1 ^ st ^ vous montre l’en-tête et le 2 ^ nd ^ le pied de page après l’exécution de la macro.

img1

L’en-tête a l’étiquette Nom de l’entreprise. Le nom n’a pas encore été saisi, car nous ne l’avons associé à aucune cellule ni ajouté de texte pour le nom de la société. Si vous entrez quelque chose dans le code ou dans la feuille Excel et que vous y faites référence, le nom sera repris et renseigné ici.

La page n ° sur 0 montre que nous avons actuellement 0 pages dans le fichier, car nous avons exécuté ce code sur un fichier vierge. Si vous exécutez ce code sur un fichier contenant des données, il vous montrera le numéro de page.

Imprimé <Date> <Heure> vous donne la date et l’heure d’exécution de la macro avec le texte «Imprimé».

img2

Dans le pied de page, l’étiquette Chemin vous montrera le chemin du fichier actuel.

Notre nom de fichier est Book1.xlsx qui est actuellement un fichier non enregistré. Par conséquent, aucun chemin n’apparaît pour l’étiquette Chemin.

Le numéro de feuille est renseigné à droite du pied de page.

Si vous avez aimé nos blogs, partagez-les avec vos amis sur Facebook. Et vous pouvez aussi nous suivre sur Twitter et Facebook.

Nous serions ravis de vous entendre, faites-nous savoir comment nous pouvons améliorer, compléter ou innover notre travail et le rendre meilleur pour vous. Écrivez-nous à [email protected]