Pied de page qui s'affiche selon certaines conditions

Bonjour,

J'ai un fichier Excel qui comporte différents onglets et chaque onglet contient un certain nombre de lignes de données.

J'aimerais faire en sorte qu'une inscription "Suite au verso" apparaisse au bas de la première page seulement si le contenu dépasse une page.

Je sais mettre un pied de page, je sais faire en sorte qu'il n'apparaisse que sur la première page, mais je ne sais pas comment remplir la condition dont j'ai besoin.

Un grand merci d'avance pour votre aide :-)

Bonjour Clavelitos et bienvenu, bonjour le forum,

Ce petit bout de code devrait t'aider :

Sub Macro1()
Dim O As Worksheet 'déclare la variable O (Onglet)
Dim NP As Byte 'déclare la variable NP (Nombre de Pages)

Set O = Worksheets("Feuil1") 'définit l'onglet O (à adapter à ton cas)
NP = O.PageSetup.Pages.Count 'définit le nombre de pages NP de l'onglet O
MsgBox NP & " page(s)" 'message 'affiche le nombre de page NP
End Sub