combo choix liste

[Simons]

Bonjour,

Il y a quelques temps j'avais un probléme pour alimenter une combobox en fonction d'un bouton d'option. Problème aujourdhui résolu. Mais j'ai un nouveau problème :
Si je clique succéssivement sur les boutons d'option les 2 listes se mettent bout à bout... :sick:
J'ai bien mis un combobox.clear mais pas de résultat..
Comment faire ???
Merci d'avance. [file name=Classeur2_20050811181026.zip size=11473]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur2_20050811181026.zip[/file]

 

[Minick]

Salut,

Le probleme c'est que tu ne clear pas ta collection Nom donc tu cumules

Cf pj

@+ [file name=Classeur2_20050811182324.zip size=12779]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur2_20050811182324.zip[/file]

 

[Simons]

Re
Extra Minik Merci pour ta solus...

@+

 

[_Thierry]

Bonjour Simons, le Forum

Ton problème est très simple, tu commets une erreur classique de débutant

C'est très bien de déclarer les Variables avec 'Option Explicit' ...

Par contre ce qui n'est pas bien c'est de les déclarer Publique niveau Private Module...

Au regard de ton exemple... Aucune de tes Variables ne semblent nécessiter un usage Publique

Remets (et répètes) les déclarations dans les Privates Sub des deux OptionButtonX_Click et tu verras tout rentrera dans l'ordre...

Bonne Soirée
[ol]@+Thierry[/ol]

PS1 tant que j'y suis :

=> Dim L, I, J As Integer
Y pas glop !!!!

Car c'est égal à :
=> Dim L As Variant, I As Variant, J As Integer

Il faut écrire :
=> Dim L As Integer, I As Integer, J As Integer

PS2 tant que je suis toujours là... Pourquoi passer par une Collection ? surtout que tu ne filtres pas les Doublons... Je suppose que c'est juste pour l'exemple... mais au cas où tu peux passer direct en Combo :
L = .Range('a65536').End(xlUp).Row
For Each c In .Range('a2:a' & L)
ComboBox1.AddItem c
Next c

Bye Bye

 

[_Thierry]

Ah pardon je ne t'avais pas vu Minick, bonsoir aussi

Sacrée usuine à gaz pour 'corriger' l'erreur classique de programmation de notre ami Simons

Bonne Soirée
[ol]@+Thierry[/ol]

 

[Simons]

Salut Thierry, re le forum,

Merci beaucoup pour ton aide si précieuse...



Bonne soirée à tous

 

[Minick]

Salut,

Pas de probleme Thierry.

J'adapte ma solution au code existant, je ne sais pas ce que simons
veux faire par la suite. C'est donc pas toujours ce qu'il ya de mieu mais ca fonctionne


@+