aide sur option button et listbox

[angoul]

bonjour,

J'ai creer une petite USF avec 3 option button et des listebox

j'aimerai que lorsque que l'on clique sur un "option button" sa active la feuille excel sa je pense que cela fonctionne ce que je fait; mais qu'il affiche les information dans la listbox principal.

Je met ici mon petit fichier pour que l'on m'aide un peut
merci de me mettre aussi a qui sert la ligne comme sa je peut apprendre

merci d'avance pour votre aide

 

[Robert]

Re : aide sur option button et listbox

Bonjour Angoul, bonjour le forum,

En pièce jointe ton fichier modifié et commenté. Je pense que tu pourrais remplacer les Listboxes 1 à 4 par des Textboxes...

Édition :

Ooops j'ai oublié de dire ! le passage se fait au double-clic...

 

[angoul]

Re : aide sur option button et listbox

Je te remercie robert, c'est ce que je voulait
mais j'ai une petite question j'ai modifier ton code qui etait :
Public Sub affich()
With UserForm1 'prend en compte l'UserForm1
.ListBox.Clear 'vide les anciennes valeur de ListBox
.ListBox.List = sh.Range("E4:E7").Value 'remplissage de ListBox
End With
End Sub

par

par Public Sub affich()
With UserForm1 'prend en compte l'UserForm1
.ListBox.Clear 'vide les anciennes valeur de ListBox
.ListBox.List = sh.Range("E4:E25").Value 'remplissage de ListBox
End With
End Sub

cela fonctionne cela s'affiche mais helas je peut plus cliquer sur un nom pour le faire passer dans l'autre listbox

peut tu m'expliquer pourquoi????

 

[Robert]

Re : aide sur option button et listbox

Bonjour Angoul, bonjour le forum,

Pour savoir dans quelle textboxes il fallait envoyer la donnée je prend en compte le nombre de valeur restantes. Comme au début il n'y avait que 4 valeurs le code indiquait : Cas 4, Cas 3, Cas 2 et Cas 1... En en ayant 25, ça ne pouvait fonctionner qu'en remplaçant respectivement par Cas 25, Cas 24, Cas 23 et Cas 22. J'espère que ces explications seront claires...

En pièce jointe ton fichier modifié.