Bonjour Emmanuel

J'espere que cet exemple , qui permet d'alimenter une ListBox dans la feuille active , pourra t'aider

Sub insertDonneesListBoxFeuille Dim oSheet As Object, maForm As Object Dim maListe As Object , oControl As ObJect Dim I As Integer

oSheet =ThisComponent.CurrentController.ActiveSheet 'premiere forme dans la feuille =getByIndex(0) maForm=oSheet.DrawPage.Forms.getByIndex(0) oControl=ThisComponent.getCurrentController 'nom de la ListBox="maListBox" maListe = maForm.Getbyname("maListBox")

for I=0 to 10 oControl.getControl(maListe).addItem ("Ligne " & I,I) Next I

End Sub

Bonne soiree Michel

<-----Message d'origine----- <De : Emmanuel Averty [mailto:man...@free.fr] <Envoyé : lundi 24 janvier 2005 17:52 <À : pr...@fr.openoffice.org <Objet : [prog] Différence entre ListBox de boite de dialogue et sur un document

<Bonjour,

<J'aimerais qques renseignements sur la gestions des ListBox en complément du thread : "OOo1.1.3: Remplir une listbox de <boîte de dialogue ..." Ce thread ma bcp aidé, mais j'aimerais réaliser à peu près la même chose avec une ListBox qui se <trouve directement sur une feuille de calcul. J'arrive à récupérer l'objet Listbox, mais la méthode addItem (par exemple) <n'existe pas pour cet objet. Grâce à l'outil Xray, je me suis rendu compte qu'effectivement un bon nombre de méthodes <nécessaire à la gestion des item manquais. Par contre je retrouve des méthodes tel que refresh ou setName.

<Ma question est donc la suivante : quelles sont les différences entre les ListBox de boîte de dialogue et ... les autres. <Et surtout : comment ajouter des éléments à ces ListBox par programmation ?