Bonjour

ajoute ceci

* pour prendre dans une cellule

laValeur = thisComponent.currentController.activesheet.getCellRangeByName("E20").value

* pour demander à l'utilisateur par une petite boite

laValeur = inputbox ("Nombre de copies ?")

rem ----------------------------------------------------------------------
dim args1(1) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Copies"

args1(0).Value = laValeur

(attention à la numericité - voir isNumeric dans l'aide)

args1(1).Name = "Collate"
args1(1).Value = false

pour les questions relatives auxmacros et à OpenOffice.org, je t'invite a rejoindre la liste prog@fr.openoffice.org

Cordialement

Laurent


--
Laurent Godard <[EMAIL PROTECTED]> - Ingénierie OpenOffice.org
Indesko >> http://www.indesko.com
Nuxeo CPS >> http://www.nuxeo.com - http://www.cps-project.org
Livre "Programmation OpenOffice.org", Eyrolles 2004

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Répondre à