[prog] Re: [spam] [prog] sélectionner par macros un diagramme dans une feuille calc

Wed, 09 Nov 2005 12:39:52 -0800 

Bonsoir,

Alpha Beta a écrit :

Bonjour,

Je cherche via macros à sélectionner visuellement un diagramme donné dans une 
feuille ( équivalent de cliquer dessus)

Comment puis-je faire ?


Peut-être quelque chose comme çà :

Sub Main
oDoc = thiscomponent
oSheet = oDoc.getSheets().getByIndex(0)
oDrawPage = oSheet.getDrawPage()
nNumShapes = oDrawPage.getCount()
oDocCtrl = oDoc.CurrentController
For i = 0 to nNumShapes-1
 oShape = oDrawPage.getByIndex(i)
 If HasUnoInterfaces(oShape, "com.sun.star.lang.XServiceInfo") Then
  If oShape.supportsService("com.sun.star.drawing.OLE2Shape") Then
   If oShape.CLSID = "12DCAE26-281F-416F-a234-c3086127382e" Then
    oDocCtrl.select(oShape)
   EndIf
  EndIf
 EndIf
Next
End Sub

François Gatto

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

Répondre à