Bonjour, je souhaite renvoyer sur un document Writer des données saisies dans une boîte de dialogue lancée par une macro (Module2). Cette boîte (Dialog2) contient : - 1 case à cocher "CheckBox1" - 2 boutons d'option "OptionButton1" et "OptionButton2" - 1 champ texte "TextField1" ---(Celui là c'est bon, ça marche)--- - 1 liste "ListBox1" (contenant les éléments - petit - moyen - grand -) - 1 Bouton Standard "CommandButton1" assigné à "Sub RenvoiDonnees"

Mais voilà, je ne sais absolument pas quel code écrire, ni l'emplacement... Je transmets en l'état le code actuel...

REM ***** BASIC ***** Dim oDialog2 as object

Sub DialogShow oDialog2 = CreateUnoDialog( DialogLibraries.Standard.Dialog2 ) oDialog2.Execute() End Sub

Sub RenvoiDonnees ' ---Comment renvoyer un texte prédéfini "cette case est cochée" au signet (monSignetCase)---

' ---Comment renvoyer un texte prédéfini "oui" si optionbutton1 est sélectionné, et "non" pour optionbutton2 au signet (monSignetOption)---

' ---Renvoie TextField1 au signet (monSignetTexte)--- Cible1=oDialog2.getControl("TextField1").getText ThisComponent.getBookmarks().getByName("monSignetTexte").getAnchor setString(Cible1)

' ---Comment renvoyer la valeur sélectionnée au signet (monSignetListe) avec les éléments de liste : petit ; moyen ; grand---

oDialog1.endExecute ' ---ferme le dialogue--- End Sub

Merci d'avance pour l'aide que vous pourrez m'apporter, j'ai eu beau chercher dans les différents sujet (API presque facile etc..., je ne retrouve pas les positions exactes des lignes de codes)... - D'autre part, Puis-je retrouver ces éléments dans le livre Macros OOoBasic et
API, ou est-il à un niveau (encore) trop évolué pour moi ?