Récupérer la valeur d'un champs de type "zone de liste"

Bonjour,
je suis néophyte dans la programmation avec le basic de libreoffice
Je cherche à récupérer la valeur de la 1ère colonne de mon controle "zone de liste" ; il ne s'agit pas du champs lié ; la valeur est de type alphanumérique

Code:

---

1 2 3

Dim oForm, oControl as Object Dim valtheme as string valtheme = ThisComponent.Drawpage.Forms.getByName("F_dossier").getByName("id_lien_activite").SelectedItems(0)

---

mon code me renvoie la valeur de mon champs lié (2ème colonne) alors que je veux le champs de la 1ère colonne
HELP
Merci

Bonjour,

Avez-vous essayé en supprimant (0) ?

Code:

---

1 2 3

Dim oForm, oControl as Object Dim valtheme as string valtheme = ThisComponent.Drawpage.Forms.getByName("F_dossier").getByName("id_lien_activite").SelectedItems

---

Ensuite l'erreur ne vient peut-être pas du code, mais de la construction du formulaire.

Cdlt.

Citation:

---

Envoyé par zoom61

Bonjour,

Avez-vous essayé en supprimant (0) ?

Code:

---

1 2 3

Dim oForm, oControl as Object Dim valtheme as string valtheme = ThisComponent.Drawpage.Forms.getByName("F_dossier").getByName("id_lien_activite").SelectedItems

---

Ensuite l'erreur ne vient peut-être pas du code, mais de la construction du formulaire.

Cdlt.

---

A mon avis, sans le s à la fin aussi

Code:

---

1 2 3

Dim oForm, oControl as Object Dim valtheme as string valtheme = ThisComponent.Drawpage.Forms.getByName("F_dossier").getByName("id_lien_activite").SelectedItem

---