Re: [prog] [Calc] Recherche exemple macro diagramme - christianwtd - org.openoffice.fr.prog

8 messages in org.openoffice.fr.progRe: [prog] [Calc] Recherche exemple m...

From	Sent On	Attachments
christianwtd	Jul 26, 2005 1:53 pm
Francois Gatto (xhydrogene)	Jul 26, 2005 2:49 pm
christianwtd	Jul 27, 2005 2:36 am
christianwtd	Jul 28, 2005 6:28 am
Laurent Godard	Jul 28, 2005 6:48 am
christianwtd	Jul 28, 2005 7:08 am
Laurent Godard	Jul 28, 2005 7:11 am
christianwtd	Jul 28, 2005 8:04 am

	Permalink for this message Paste this link in email or IM:
	Permalink for this thread Paste this link in email or IM:
	Atom feed for this thread Paste this URL into your reader:

Subject:	Re: [prog] [Calc] Recherche exemple macro diagramme	Actions...
From:	christianwtd (chri...@free.fr)
Date:	Jul 28, 2005 8:04:13 am
List:	org.openoffice.fr.prog

Laurent Godard a écrit :

makeRectangle --> tu as redefini cette fonction ?

Bon, c'est fait. J'avance péniblement. Maintenant je bute ici : uno.invoke(oDoc, "print", (Array(makePropertyValue( "CopyCount", 2), makePropertyValue( "Pages", "1-4;10"),)) )

J'ai trouvé cette fonction toute faite :

Function MakePropertyValue(cName, uValue) As Object Dim oPropertyValue As Object Dim oSM As Object Set oSM = CreateObject("com.sun.star.ServiceManager") Set oPropertyValue = oSM.Bridge_GetStruct("com.sun.star.beans.PropertyValue") oPropertyValue.Name = cName oPropertyValue.Value = uValue Set MakePropertyValue = oPropertyValue End Function

Et bien entendu, je plante Si je remplace : Set oPropertyValue = oSM.Bridge_GetStruct("com.sun.star.beans.PropertyValue") par : Set oPropertyValue = com.sun.star.beans.PropertyValue ça passe (apparemment) mais ça casse juste après avec : oPropertyValue.Name = cName

C'est grave, docteur ?

Bon surf Christian

	Start a set with this search
	Include this search in one of my sets
	Exclude this search from one of my sets
	Permalink to these results Paste this link in email or IM:
	Atom feed for tracking future search results Paste this URL into your reader: