Re: [fr-users] Re: Macro pour copier un diagramme fait dans Calc dans un tableau de Writer

Merci Pierre-Yves,
Je vais le tester en fin de semaine
Cordialement
Jean Luc

Le 17/03/2015 16:23, pierre-yves samyn a écrit :
> Bonjour
>
> Si tu nommes ton diagramme par clic droit sur le diagramme > Nom, tu peux
> y accéder (relativement) simplement de cette façon (le diagramme cherché
> a été nommé "test" dans cet exemple) :
>
> sub PysCopierGraphe
>
> dim oClasseur as Object, oFeuille as Object, oShape as object
> dim document   as object, dispatcher as object
> dim iNbShape as integer
>
> oClasseur = thisComponent
> oFeuille = oClasseur.sheets.getByName("Feuille1")
>
> for iNbShape = 0 to oFeuille.DrawPage.count - 1
>          oShape = oFeuille.DrawPage.getByIndex(iNbShape)
>          if oShape.name = "test" then
>                         thiscomponent.currentcontroller.select(oshape)
>                         document   = ThisComponent.CurrentController.Frame
>                         dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
>                         dispatcher.executeDispatch(document, ".uno:Copy", "", 0, Array())
>                  exit for
>          end if
> next iNbShape
>   
> end sub
>
> Cordialement
> Pierre-Yves
>
>
>
> --
> View this message in context: 
> http://nabble.documentfoundation.org/Macro-pour-copier-un-diagramme-fait-dans-Calc-dans-un-tableau-de-Writer-tp4143484p4143525.html
> Sent from the Users mailing list archive at Nabble.com.


--
M. Jean Luc Bélondrade
1 Domaine de la Haute Borne
27700 Hennezis
tél. : 02 32 54 65 90
jeanluc.belondrade@free.fr

Monsieur,


--
Envoyez un mail à users+unsubscribe@fr.libreoffice.org pour savoir comment vous désinscrire
Les archives de la liste sont disponibles à http://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être 
supprimés