OVH Cloud OVH Cloud

VBA, Impression et Word97

1 réponse
Avatar
Sébastien
Bonjour à tous,

Pour différentes raisons, plusieurs documents ont été inséré dans un fichier
Word 97. Pour gérer l’impression de ces documents, une macro a été mise en
place.

Actuellement la procédure d’impression est la suivante : lorsqu’on lance
l’impression une UserForm s’affiche où l’utilisateur coche les documents
qu’il souhaite imprimer, un MsgBox lui indique alors les sections du fichier
Word à imprimer et qu’il doit taper dans la fenêtre d’impression qui
s’affiche après le MsgBox.

Je souhaiterai que les informations données dans le MsgBox s’affiche
directement dans la fenêtre d’impression pour que l’utilisateur ne soit plus
obligé de saisir la zone d’impression.

Si quelqu’un peut m’aider je le remercie d’avance.

Seb.

1 réponse

Avatar
Oliv'
Sébastien que je salut a écrit dans

Bonjour à tous,

Pour différentes raisons, plusieurs documents ont été inséré dans un
fichier Word 97. Pour gérer l'impression de ces documents, une macro
a été mise en place.

Actuellement la procédure d'impression est la suivante : lorsqu'on
lance l'impression une UserForm s'affiche où l'utilisateur coche les
documents qu'il souhaite imprimer, un MsgBox lui indique alors les
sections du fichier Word à imprimer et qu'il doit taper dans la
fenêtre d'impression qui s'affiche après le MsgBox.

Je souhaiterai que les informations données dans le MsgBox s'affiche
directement dans la fenêtre d'impression pour que l'utilisateur ne
soit plus obligé de saisir la zone d'impression.

Si quelqu'un peut m'aider je le remercie d'avance.

Seb.


regarde dans l'aide les options de la commande
printout
expression.PrintOut(Background, Append, Range, OutputFileName, From, To,
Item, Copies, Pages, PageType, PrintToFile, Collate, FileName,
ActivePrinterMacGX, ManualDuplexPrint, PrintZoomColumn, PrintZoomRow,
PrintZoomPaperWidth, PrintZoomPaperHeight)
tu dois remplacer l'un des éléments par le résultat de ton Msgbox.

--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
Pour me joindre : http://cerbermail.com/?V8r2o1YHl4
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~