OVH Cloud OVH Cloud

Demande de conseils pour impression en double sur 1 page

21 réponses
Avatar
Octave
Bonjour,

Je vous explique mon problème :
Dans le but d'archiver certaines informations, je souhaiterais avoir la
possibilité d'imprimer un même document deux fois sur une même page sans
avoir à faire trop de manipulations.

Un petit exemple vaut mieux qu'un long discours : 1 document A (1 page A4
portrait) --> s'imprimerait --> 2 documents A (donc en 2 fois sur 1 page A4
paysage).

Que me conseillez vous ? Une macro ? ou connaissez vous une manipulation
plus simple encore ?

Merci d'avance

Cyril

10 réponses

1 2 3
Avatar
Octave
Bonjour,

"Geo" a écrit dans le message de
news:
OK c'est clair, mais ce que tu attends du forum, c'est des idées ou la
macro toute faite ?


Dans un premier temps des idées...
Si vraiment je galère pour la macro, ce sera des conseils pour la
réalisation de la dite macro.

Merci

Avatar
Octave
Bonjour et merci de votre réponse

"Gloops" a écrit dans le message de
news:c729u1$r97$
En tout cas, il va falloir placer le texte deux fois sur une page et
l'idée de Geo de le placer dans un tableau n'est pas pire qu'une autre,
si il n'y a pas déjà un tableau dans le document. Si il y a trop de
tableaux je crois qu'on pourrait se rabattre sur des cadres, à vérifier.


Si je comprends bien : dans ce cas ce serais une petit formule qui
demanderait le même texte dans la colonne 2 que celui de la colonne 1

Si je ne m'abuse il existe un champ pour insérer le contenu d'un
fichier. Rien n'interdit de mettre deux fois ce champ, que je sache (à
vérifier, quand même). Si on a souvent à faire la manoeuvre on peut
mettre un nom temporaire pour le fichier inséré. Sauvegarder son tract
avec le nom temporaire, ouvrir le fichier doubleur, imprimer, fermer.
Pour ceci une macro pourrait être pratique, et son enregistrement ne
devrait guère prendre plus d'une trentaine de secondes il me semble. Si
on veut une demande de confirmation pour l'enregistrement du fichier
actif comme TEMPO.DOC, bien entendu il faudra bien se pencher sur le code.

DOUBLEUR.DOC :
TEMPO.DOC TEMPO.DOC

C'est un premier jet, peut-être qu'un autre nom pour le fichier
temporaire apparaîtra plus adapté. C'est changer en route qui prendrait
du temps.


Je ne connaissais pas ce champ, je vais rechercher. L'idée est très bonne.


Souvent je me contente d'un copier-coller, pour ce genre de réalisation,
mais c'est vrai que si c'est une affaire assez régulière ...


Non seulement régulièrement, mais aussi un besoin de rapidité (réagir vite
et bien)

On peut même avoir une version avec six exemplaires sur la page, pour un
document plus petit :)


12 peut marcher aussi... ;o)

Merci encore

Avatar
SNTBI
Re,
Je vous est compris....... Octave l'a rêvé Didier l'a fait.

Imprimer la page 1;1 et dans propriétés de l'imprimante ( HP OfficeJet G95)
deux pages par feuille.
Dans le champ page et faut mettre 1;1;2;2;3;3;4;4 etc... et demander à
l'imprimante ( dans ces propriétés 2 pages par feuille ).
il n'y a plus qu'a faire la macro.
Didier.

"Octave" a écrit dans le message de
news:c727ol$jjp$
Bonjour,

"SNTBI" a écrit dans le message de
news:
re,
Deux exemplaires non assemblés deux pages par page ça existe ?
Didier.


Les deux exemplaires sont assemblés, mais un coup de massicot arrangera
rapidement le problème.
Autre précision : il s'agit de 2 pages par feuille (sans recto verso)

Je me doute que ma demande est quelque peu inhabituelle. J'essaye de
repréciser :

______
! ! ___________
! A ! --- ! A A ! --- Massicot ---
2 documents A (dont 1 pour archive)
! ! --- / ! 50 % 50
---/

!______! ! __________!


But : 1) économiser des feuilles (les documents ne sont que des messages
internes)
2) avoir le moins de manipulations possibles

NB : je pense que la macro reste le meilleurs moyen...
J'attends des avis contraires de la part des utilisateurs avertis


Merci d'avance.

Cyril





Avatar
SNTBI
Re,
voilà la mienne. Pour " pages Pages:="1;1;2;2;3;3" " il faudrait trouver une
solution qui les compte et corrige pour que ça marche dans le cas ou il y
aurait plus de trois pages ( Si il y en à moins pas de problème )

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 02/05/2004 par Didier DELBRAYERE
'
Application.PrintOut FileName:="", Range:=wdPrintRangeOfPages, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="1;1;2;2;3;3", PageType: _
wdPrintAllPages, ManualDuplexPrint:úlse, Collate:úlse,
Background:= _
True, PrintToFile:úlse, PrintZoomColumn:=0, PrintZoomRow:=0, _
PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
End Sub

Didier.

"SNTBI" a écrit dans le message de
news:
Re,
Je vous est compris....... Octave l'a rêvé Didier l'a fait.

Imprimer la page 1;1 et dans propriétés de l'imprimante ( HP OfficeJet
G95)

deux pages par feuille.
Dans le champ page et faut mettre 1;1;2;2;3;3;4;4 etc... et demander à
l'imprimante ( dans ces propriétés 2 pages par feuille ).
il n'y a plus qu'a faire la macro.
Didier.

"Octave" a écrit dans le message de
news:c727ol$jjp$
Bonjour,

"SNTBI" a écrit dans le message de
news:
re,
Deux exemplaires non assemblés deux pages par page ça existe ?
Didier.


Les deux exemplaires sont assemblés, mais un coup de massicot arrangera
rapidement le problème.
Autre précision : il s'agit de 2 pages par feuille (sans recto verso)

Je me doute que ma demande est quelque peu inhabituelle. J'essaye de
repréciser :

______
! ! ___________
! A ! --- ! A A ! ---
icot ---


2 documents A (dont 1 pour archive)
! ! --- / ! 50 % 50
---/

!______! ! __________!


But : 1) économiser des feuilles (les documents ne sont que des messages
internes)
2) avoir le moins de manipulations possibles

NB : je pense que la macro reste le meilleurs moyen...
J'attends des avis contraires de la part des utilisateurs avertis


Merci d'avance.

Cyril









Avatar
Octave
Youpi ! Merci pour votre réponse (je n'avais pas pensé à cette méthode)

"SNTBI" a écrit dans le message de
news:
Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 02/05/2004 par Didier DELBRAYERE
'
Application.PrintOut FileName:="", Range:=wdPrintRangeOfPages, Item: _
wdPrintDocumentContent, Copies:=1, Pages:="1;1;2;2;3;3",
PageType: > _

wdPrintAllPages, ManualDuplexPrint:úlse, Collate:úlse,
Background:= _
True, PrintToFile:úlse, PrintZoomColumn:=0, PrintZoomRow:=0, _
PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
End Sub

Didier.


J'ai modifié :
PrintZoomColumn:=0 ---> PrintZoomColumn:=2
PrintZoomRow:=0 ---> PrintZoomRow:=1
Pour obtenir 2 pages sur une feuille
et le tour est jouée

en ce qui concerne le "1;1;2;2;3;3" et le problème que vous soulevez
A titre personnel, je ne suis pas embêté par cette limite. Toutefois,
histoire d'obtenir une macro valable dans la majorité des cas, je
souhaiterais pousser un peu plus loin la recherche.
Ainsi, je souhaiterais savoir si vous connaissez une variable qui pourrait
remplacer : Pages:="1;1;2;2;3;3"

Merci

Avatar
Octave
Encore plus loin (mais là ça me dépasse techniquement)--->

"Octave" a écrit dans le message de
news:c72n8v$o4k$
Ainsi, je souhaiterais savoir si vous connaissez une variable qui pourrait
remplacer : Pages:="1;1;2;2;3;3"


Serait il possible d'afficher une boite de dialogue qui demanderait les N°
de pages à imprimer.
Si quelqu'un maîtrise et à quelques instants à me consacrer...
Je m'engage à faire un récapitulatif et à le publier ici.

Merci

NB : ma question initiale a été totalement résolue

Avatar
Gloops
Salut,

Dans l'aide de Dialog on trouve ça quelque part (chercher le lien vers
les boîtes de dialogue prédéfinies), mais il s'agirait d'abord de
vérifier si l'impression avec les pages 1;1 donne bien ce qui est
demandé. Je m'attends plutôt à voir sortir une feuille avec la page 1
dessus, puis encore une feuille avec la page 1 dessus. Nous sortons donc
complètement de l'énoncé, je dis qu'un problème à la fois c'est déjà
suffisamment compliqué comme ça.

D'ailleurs, on ne dit pas Pages:="1;1;2;2;3;3", mais :
Pages:="1-3", Copies:="2"

(vérifier l'orthographes de Copies, car je dis ça de mémoire.)
_____________________________________
Octave a écrit, le 02/05/2004 16:55 :
Encore plus loin (mais là ça me dépasse techniquement)--->

"Octave" a écrit dans le message de
news:c72n8v$o4k$

Ainsi, je souhaiterais savoir si vous connaissez une variable qui pourrait
remplacer : Pages:="1;1;2;2;3;3"



Serait il possible d'afficher une boite de dialogue qui demanderait les N°
de pages à imprimer.
Si quelqu'un maîtrise et à quelques instants à me consacrer...
Je m'engage à faire un récapitulatif et à le publier ici.

Merci

NB : ma question initiale a été totalement résolue


Ah ben tant mieux


Avatar
Gloops
Oh que j'ai fait fort, là.
_____________________________________
Gloops a écrit, le 04/05/2004 04:27 :

(vérifier l'orthographes de Copies, car je dis ça de mémoire.)
oops


Avatar
Octave
Bonjour,
"Gloops" a écrit dans le message de
news:c76uu0$50l$
Salut,

Dans l'aide de Dialog on trouve ça quelque part (chercher le lien vers
les boîtes de dialogue prédéfinies),


Je vais m'y pencher rapidement.

mais il s'agirait d'abord de
vérifier si l'impression avec les pages 1;1 donne bien ce qui est
demandé. Je m'attends plutôt à voir sortir une feuille avec la page 1
dessus, puis encore une feuille avec la page 1 dessus.


Comme préciser dans les messages ci dessus :
"Octave" a écrit dans le message de
news:c7325o$1a6$
NB : ma question initiale a été totalement résolue



"Gloops" a écrit dans le message de
news:c76uu0$50l$
Nous sortons donc
complètement de l'énoncé, je dis qu'un problème à la fois c'est déjà
suffisamment compliqué comme ça.


Je me répète problème déjà régler. Dites moi Gloops, suis je autorisé à
passer au suivant ?

D'ailleurs, on ne dit pas Pages:="1;1;2;2;3;3", mais :
Pages:="1-3", Copies:="2"


Je prends note du conseil et je vais essayer de comparer la différence.
(sachant que dans un cas : ça marche déjà)

Merci
pour votre aide

Cyril

Avatar
SNTBI
Bonjour Gloups,
Il y a des jours comme aujourd'hui ou il faut dormir encore un peut.
La première question était imprimer en deux exemplaires sur un même feuille
chaque page d'un document. Nous avions la solution et celle que vous proposé
n'est pas la bonne. il fallait dire impression des pages 1;1;2;2;3;3 option
d'imprimante 2 pages par feuille. l'impression des page 1-3 en 2 exemplaires
deux pages par feuille ne donne pas le résultat souhaité.
Pour ce type d'exercices vous pouvez demander à Octave maintenant il est
pro.
Didier.

"Gloops" a écrit dans le message de
news:c774g4$4oe$
Oh que j'ai fait fort, là.
_____________________________________
Gloops a écrit, le 04/05/2004 04:27 :

(vérifier l'orthographes de Copies, car je dis ça de mémoire.)
oops





1 2 3