[Résolu] imprimer plusieurs copies

Discussions et questions sur tout ce qui concerne la programmation tous langages et tous modules confondus.

Modérateur : Vilains modOOs

Règles du forum
:alerte: Balisage obligatoire dans cette section !
Aidez-nous à vous aider au mieux en balisant correctement votre question : reportez-vous sur les règles de cette section avant de poster !
akira-de-sdk
NOOuvel adepte
NOOuvel adepte
Messages : 20
Inscription : 23 nov. 2006 11:11

[Résolu] imprimer plusieurs copies

Message par akira-de-sdk »

Bonjour!
J'essaie de créer une macro qui consiste à récupérer un nombre dans un champ numérique et de s'en servir pour indiquer le nombre de copies à imprimer. Je ne sais pas si j'ai été clair mais est-ce réalisable?
Si oui, quel est le code adéquate?
Merci pour vos suggestions.


P-S : j'ai essayé de bidouiller ce code sans succès... :

Code : Tout sélectionner

sub Imprimer


dim document   as object
dim dispatcher as object

document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

dim args1(1) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Copies"
args1(0).Value = 1
args1(1).Name = "Collate"
args1(1).Value = false

dispatcher.executeDispatch(document, ".uno:Print", "", 0, args1())


end sub
Dernière modification par akira-de-sdk le 13 déc. 2006 10:07, modifié 1 fois.
Soyons solidaire, pas solitaire... :D

OOo v2.0 sur Windows
Avatar de l’utilisateur
chater
Membre cOOnfirmé
Membre cOOnfirmé
Messages : 237
Inscription : 21 févr. 2006 13:43
Localisation : Paname

Message par chater »

Où vas-tu chercher tes propriétés ? :shock:

Code : Tout sélectionner

args1(0).Name="CopyCount"
args1(0).Value=2 
args1(1).Name="Collate"
args1(1).Value=true 
OOo 3.1 officielle sous Ubuntu 9.04

Pensez à aider les autres en répondant à leurs questions.
akira-de-sdk
NOOuvel adepte
NOOuvel adepte
Messages : 20
Inscription : 23 nov. 2006 11:11

Message par akira-de-sdk »

Ces propriètés ont été obtenues en faisant Enregistrer une macro => Fichier => Imprimer => terminer l'enregistrement.
J'ai remplacé les anciennes propriètés par les tiennes et l'imprimante ne me sort toujours qu'une feuille. :cry:
Sinon mon problème demeure toujours : comment récupérer un nombre dans un champ numérique pour le mettre dans une variable et comment faire pour que le nombre de copies imprimé soit égal à cette variable?
Merci :D
Soyons solidaire, pas solitaire... :D

OOo v2.0 sur Windows
Pierre-Yves Samyn
Grand Maître de l'OOffice
Grand Maître de l'OOffice
Messages : 11276
Inscription : 02 mai 2006 08:42

Message par Pierre-Yves Samyn »

Bonjour

Pour la récupération d'un champ (de formulaire je suppose ?) tu as 4 lignes en dessous de ta question un item : [Résolu] utiliser le contenu d'une TextBox dans une macro.

http://user.services.openoffice.org/fr/ ... c3118.html

En complément de la réponse de chater, ci-dessous un autre fil qui traite de la gestion des formats de page et de l'impression.

http://user.services.openoffice.org/fr/ ... print.html

Et ici une autre manière de procéder :
http://user.services.openoffice.org/fr/ ... print.html

Evidemment, il reste à assembler les bouts...
akira-de-sdk
NOOuvel adepte
NOOuvel adepte
Messages : 20
Inscription : 23 nov. 2006 11:11

Message par akira-de-sdk »

merci à toi!
J'ai bien regardé les posts que tu m'as montré et même si elle n'est pas élégante, je choisis la solution "boucle" pour imprimer plusieurs fois mon fichier :D
Encore merci pour ton aide précieuse ^^
Soyons solidaire, pas solitaire... :D

OOo v2.0 sur Windows