Bonjour,

Je suis face à une curiosité.
J'imprime 3 listes provenant toutes de la même source de données.
C'est une liste de participants à un évènement et j'ai besoin de 3 listes distinctes. Les soldats, les sous-officiers et les officiers.
Comme il s'agit de la même liste filtrée différemment, j'ai développé une petite routine que j'ai copié/collé et pour lesquelles j'ai fait les adaptations nécessaires.
J'ai donc trois macros différentes. Il s'agit donc de trois modules différents.

Parmi ces adaptations, il y a l'en-tête du document.
Voici le code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
    With ActiveSheet.PageSetup
        .PrintTitleRows = "$1:$1"
        .PrintTitleColumns = ""
        .LeftHeader = "&G"
        .CenterHeader = "&18Liste des soldats"
        .RightHeader = ""
        .LeftFooter = "Imprimé le &D à &T"
        .CenterFooter = ""
        .RightFooter = "Page &P/&N"
         etc...
Si j'imprime la liste en lançant la macro, le contenu de CenterHeader est le dernier utilisé. Donc, s'il s'agissait de "Liste des sous-officiers", il m'imprime "Liste des sous-officiers" malgré le .CenterHeader = "&18Liste des soldats" !
Par contre, si je passe sur l'instruction via <F8>, c'est le contenu correct qui est utilisé ?!

Quelqu'un a une idée ?

Merci d'avance pour vos lumières,

Henri