numérotation de page excel en visual basic Résolu/Fermé

Question

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

Configuration: Windows XP / Firefox 3.6.8

BenitoGrande · Answer

Personne n'a une idée?

lermite222 · Answer

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+

BenitoGrande · Answer

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!

Numérotation de page excel en visual basic

3 réponses