Listbox et Rowsource

Bonjour,

J'ai une base qui va de A1 à AI4670.
Les entetes de colonnes sont bien sur sur la ligne 1.

Voila le debut du code de mon userform:

Code:

---

1 2 3 4 5 6 7 8

Private Sub UserForm_Initialize() Set f = Sheets("bd") der_ligne = f.Range("A1").End(xlDown).Row Set Rng = f.Range("A2:AI" & der_ligne) NomTableau = "Tableau1" ActiveWorkbook.Names.Add Name:=NomTableau, RefersTo:=Rng '---- Me.ListBox1.RowSource = Rng.adress

---

Et là j'ai le message:

Citation:

---

Erreur d'exécution '438':
Propriété ou méthode non gérée par cet objet

---

J'ai cherché sur plusieurs autres forums, sans trouver de solution qui fonctionne.
La propriété Columnheads est bien à True sur mon userform.
Merci de me dire ou je fais l'erreur .

Bonjour,

Citation:

---

Code:

---

Me.ListBox1.RowSource = Rng.adress

---

---

Address serait préférable comme orthographe et j'ajouterais qu'il est plus qu'indiqué de définir l'adresse complète Rng.Address(External:=True)

Bonjour papyvon, Bonjour Philippe,

Pour ma part, je considère ce processus comme désuet.

Sur une table de données, l'incrémentation du contrôle s'effectuerait en 1 seule ligne.

Code:

---

1 2 3 4 5 6 7 8 9 10

Option Explicit   Sub essai_list()   With usf_p .Lalisteb.List = Worksheets(1).Range("T_montablo[id]").Value .Show End With   End Sub

---

L'avantage est que la présence de nouveaux enregistrements dans ta table n'affectera en rien la ListeBox. Ses items s'en trouveront automatiquement mis à jour.

Bonjour Marcel,

Citation:

---

Pour ma part, je considère ce processus comme désuet.
Sur une table de données, l'incrémentation du contrôle s'effectuerait en 1 seule ligne.

---

Bien entendu, je ne programme pas non plus comme cela et je n'utilise que les tables structurées pour stocker les données.
Je n'ai fait que répondre à une demande spécifique mais j'avoue que j'aurais dû ajouter qu'il y avait une meilleure solution et donner un exemple mais vu l'heure tardive, j'avais d'autres choses à faire.

Hé pas de problème, Philippe, tu penses bien!

Mon message était adressé à notre ami, en tenant compte que plusieurs membres peuvent consulter la discussion.

Qui plus est, j'ai appris sur la propriété Address (:plusser:)

Pour info, à cette heure là, j'ai les doigts de pied écartés, un verre à la main, devant une bonne série. :D

Citation:

---

Envoyé par Philippe Tulliez

Bonjour Marcel,

Bien entendu, je ne programme pas non plus comme cela et je n'utilise que les tables structurées pour stocker les données.
Je n'ai fait que répondre à une demande spécifique mais j'avoue que j'aurais dû ajouter qu'il y avait une meilleure solution et donner un exemple mais vu l'heure tardive, j'avais d'autres choses à faire.

---

Merci pour vos conseils: l'erreur a disparu.
Concernant vos commentaires, ils sont sans doute justifiés, mais je dois dire que cette partie de mon userform concernant le remplissage de la listbox est un code que j'ai trouvé sur un forum. Comme il me donnait les resultats que je voulais, je n'y ai pas fait de modifications. Mais je vais tacher de mettre en oeuvre la solution recommandée par MarcelG.

Merci beaucoup à tous les deux.

Salut,

2 tutoriels à consulter
Présentation des tableaux structurés
Les tableaux structurés et VBA

Et bien sûr les différentes discussions sur ce forum.

Bonne continuation et à bientôt.

Citation:

---

Envoyé par MarcelG

Salut,

2 tutoriels à consulter
Présentation des tableaux structurés
Les tableaux structurés et VBA

Et bien sûr les différentes discussions sur ce forum.

Bonne continuation et à bientôt.

---

Merci beaucoup