OVH Cloud OVH Cloud

numeros de pages

4 réponses
Avatar
Rodolphe BOURSIER
comment imprimer un document avec des numéros de pages impairs (que des
rectos 1, 3, 5, 7 ...) ? Une macro VBA peut-elle me permettre d'effectuer
cette manip ou existe-t-il une astuce dans Excel que j'aurais zappé ?

4 réponses

Avatar
Papy Jean
Bonsoir Rodolphe

Comme personne ne t'a encore répondu, c'est peut être que la chose n'est pas
directement possible.

Voici ce que je te propose

Faire une macro qui lance l'impression page par page
+ soit en copiant chaque page sur une feuille de travail
+ soit en redéfinissant à chaque fois la zone d'impression.

Tu pourras alors biaiser Excel en lui donnant, non pas un N° de page mais un
titre qui contient le mot page et le N° que tu voudras
EX:
With ActiveSheet.PageSetup
.LeftHeader = ""
.CenterHeader = " Mon beau Titre Page 3/15"
.RightHeader = ""
End With

Comme tu risques d'avoir des soucis avec les sauts de page qui auraient déjà
été mis, voici une façon de les enlever, qui m'a été donnée sur ce forum.
Cells.PageBreak = xlPageBreakNone

Il me paraît prudent de travailler non sur la feuille originelle, mais sur
une copie

Salutations
Papy Jean

"Rodolphe BOURSIER" a écrit dans le message de
news:BD254A55.2A5B%
comment imprimer un document avec des numéros de pages impairs (que des
rectos 1, 3, 5, 7 ...) ? Une macro VBA peut-elle me permettre d'effectuer
cette manip ou existe-t-il une astuce dans Excel que j'aurais zappé ?



Avatar
ChrisV
Comme personne ne t'a encore répondu, c'est peut être que la chose n'est
pas

directement possible.


Ou p'têt bien aussi la façon de poser la demande...
http://groups.google.com/groups?q=imprimer+pages+impaires+group:microsoft.public.fr.excel&hl=fr&lr=&ie=UTF-8&c2coff=1&selm>510E0A.BDF87C78%40wanadoo.fr&rnum=1


ChrisV


"Papy Jean" a écrit dans le message de
news:cdomml$m03$
Bonsoir Rodolphe

Comme personne ne t'a encore répondu, c'est peut être que la chose n'est
pas

directement possible.

Voici ce que je te propose

Faire une macro qui lance l'impression page par page
+ soit en copiant chaque page sur une feuille de travail
+ soit en redéfinissant à chaque fois la zone d'impression.

Tu pourras alors biaiser Excel en lui donnant, non pas un N° de page mais
un

titre qui contient le mot page et le N° que tu voudras
EX:
With ActiveSheet.PageSetup
.LeftHeader = ""
.CenterHeader = " Mon beau Titre Page 3/15"
.RightHeader = ""
End With

Comme tu risques d'avoir des soucis avec les sauts de page qui auraient
déjà

été mis, voici une façon de les enlever, qui m'a été donnée sur ce forum.
Cells.PageBreak = xlPageBreakNone

Il me paraît prudent de travailler non sur la feuille originelle, mais sur
une copie

Salutations
Papy Jean

"Rodolphe BOURSIER" a écrit dans le message de
news:BD254A55.2A5B%
comment imprimer un document avec des numéros de pages impairs (que des
rectos 1, 3, 5, 7 ...) ? Une macro VBA peut-elle me permettre
d'effectuer


cette manip ou existe-t-il une astuce dans Excel que j'aurais zappé ?








Avatar
Papy Jean
Bonsoir !
Je n'avais pas compris cela:
J'avai crû que Rodolphe voulait imprimer TOUTES les pages mais en
incrémentant le N° de 2 en 2

Sans doute ai-je mal lu

Papy Jean


"ChrisV" a écrit dans le message de
news:u%
Comme personne ne t'a encore répondu, c'est peut être que la chose n'est
pas

directement possible.


Ou p'têt bien aussi la façon de poser la demande...

http://groups.google.com/groups?q=imprimer+pages+impaires+group:microsoft.public.fr.excel&hl=fr&lr=&ie=UTF-8&c2coff=1&selm>510E0A.BDF87C78%40wanadoo.fr&rnum=1







Avatar
sabatier
doit y avoir un peu de ça, je pense...
cf. La rancune du Lakota aux Editions Gallipettes sous la plume (si j'ose
dire) de Vsirhc (1857-???)
jps

"ChrisV" a écrit dans le message de
news:u%
Comme personne ne t'a encore répondu, c'est peut être que la chose n'est
pas

directement possible.


Ou p'têt bien aussi la façon de poser la demande...

http://groups.google.com/groups?q=imprimer+pages+impaires+group:microsoft.public.fr.excel&hl=fr&lr=&ie=UTF-8&c2coff=1&selm>510E0A.BDF87C78%40wanadoo.fr&rnum=1



ChrisV


"Papy Jean" a écrit dans le message de
news:cdomml$m03$
Bonsoir Rodolphe

Comme personne ne t'a encore répondu, c'est peut être que la chose n'est
pas

directement possible.

Voici ce que je te propose

Faire une macro qui lance l'impression page par page
+ soit en copiant chaque page sur une feuille de travail
+ soit en redéfinissant à chaque fois la zone d'impression.

Tu pourras alors biaiser Excel en lui donnant, non pas un N° de page
mais


un
titre qui contient le mot page et le N° que tu voudras
EX:
With ActiveSheet.PageSetup
.LeftHeader = ""
.CenterHeader = " Mon beau Titre Page 3/15"
.RightHeader = ""
End With

Comme tu risques d'avoir des soucis avec les sauts de page qui auraient
déjà

été mis, voici une façon de les enlever, qui m'a été donnée sur ce
forum.


Cells.PageBreak = xlPageBreakNone

Il me paraît prudent de travailler non sur la feuille originelle, mais
sur


une copie

Salutations
Papy Jean

"Rodolphe BOURSIER" a écrit dans le message de
news:BD254A55.2A5B%
comment imprimer un document avec des numéros de pages impairs (que
des



rectos 1, 3, 5, 7 ...) ? Une macro VBA peut-elle me permettre
d'effectuer


cette manip ou existe-t-il une astuce dans Excel que j'aurais zappé ?