Numérotation de page excel en visual basic

Résolu
BenitoGrande Messages postés 15 Statut Membre -  
BenitoGrande Messages postés 15 Statut Membre -
Bonjour,

Je travail actuellement sur un projet et je dois trouver le moyen d'intégrer la numérotation de page dans l'en-tête de mon fichier.



Actuellement, l'en-tête de ce fichier est répété au moment de l'impression via le code suivant :

ActiveSheet.PageSetup.PrintArea = "$A$1:$K$" & NbEnregRes

ZonImp = "$A$1:$" & M & "$" & NbEnregRes
With ActiveSheet.PageSetup
.PrintTitleRows = "$1:$5"
Cells(2, 11).Select
Selection = "= PageOfPages"
End With

La formule PageOfPages est un nom mais le problème c'est que ce nom m'affiche tout le temps page 1/2 (j'ai en effet deux pages).
J'aimerai que l'on me dise comment affcher une numérotation de page dynamique dans l'en-tête et si possible en utilisant les noms (c'est vraiment dans le meilleur des cas^^).

Merci à tous

A voir également:

3 réponses

Réponse 1 / 3
lermite222 Messages postés 9042 Statut Contributeur 1 191
 
Bonjour,
C'est la plage d'impression qui comprend 2 pages ?
Si oui, ajoute 
    With ActiveSheet.PageSetup
        .RightHeader = "Page &P de &N"
        .FirstPageNumber = xlAutomatic
        ....
    End With

Y a moyen d'ajouter un nom mais j'ai pas bien compris ou il est ?
A+
1
Réponse 2 / 3
BenitoGrande Messages postés 15 Statut Membre 2
 
Personne n'a une idée?
0
Réponse 3 / 3
BenitoGrande Messages postés 15 Statut Membre 2
 
Oui effectivement la page d'impression comprend deux pages. Le souci c'est que ta solution ne permet pas de géré la case ou l'on veut afficher la numérotation de la page. La numérotation se placant en haut a droite.

Pour ma part j'aimerai qu'elle apparaisse dans le coeur de la page sur une entete que je "conçoit" moi-même et que je répète sur chacune des pages.

merci tout de même et si tu as une autre idée n'hésite pas!
0