Alimenter combobox via rowsources (variable)

Bonjour ,

J'ai un userform compose de 2 bouton de sélection ( art et chro)

J'aimerai que selon le bouton coché art ou chro , la source qui alimente ma combobox change...

j'utilise le code suivant :

Public Sub Liste_Code_Art_Chro_Change()

Me.Liste_Code_Art_Chro.RowSource = Rsource

ou rsource est variable ( modifier selon le bouton sélectionner) mais ma liste reste vide ...

j'ai donc essayer

Public Sub Liste_Code_Art_Chro_Change()

Me.Liste_Code_Art_Chro.RowSource = feuil3.range("A1:A3")

Mais la liste reste vide , j'utilise peut être mal la fonction Rowsource...

Merci d'avance

Bonjour,

la syntaxe de rowsource n'est pas correcte

essaie

Me.Liste_Code_Art_Chro.RowSource = "feuil3!A1:A3"

si rSource est un range

Me.Liste_Code_Art_Chro.RowSource = rsource.parent.name & "!" & rsource.address

Merci de votre réponse,

Je ne comprend pas aucune des deux solutions ne fonctionne...

il y a pourtant bien des données dans les plage utilisé !

En revanche quand je mets une liste dans rowsource via les propriétés du combobox ça fonctionne, peut être un mauvais format des données nn ?

Merci

Bonsoir,

que contient rsource ?

que t'affiche le code suivant

t = rsource.Parent.Name & "!" & rsource.Address
MsgBox t
ListBox1.RowSource = t

bonjour , merci encore de votre intérêt.

C'est comme si tous se que je mettais en code vba pour la combobox n’était pas pris en compte!

Le code ne donne rien ...

Se que j'ai dans mon module :

>>>

Private Sub Select_Code_Art_Click() ' le bouton code article

Dim Rsource As Variant

Rsource = "feuil3!A10:A161"

End Sub

>>>

Private Sub Select_Code_chro_Click() ' le bouton code chrono

Dim Rsource As Variant

Rsource = "feuil23!A10:A161"

End Sub

>>>>>

Private Sub Liste_Code_Art_Chro_Change() ' ici la combobox déroulante

Me.Liste_Code_Art_Chro.RowSource = "feuil3!A10:A130"

t = Rsource.Parent.Name & "!" & Rsource.Address

MsgBox t

ListBox1.RowSource = t

End Sub

>>>>

Petite mise au point , je souhaite que la rowsource de Liste_Code_Art_Chro change en fonction du bouton sélectionné ...

Merci

Rebonjour ,

J'ai trouvé la solutions via :

Private Sub Select_Code_Art_Click()

Liste_Code_Art_Chro.RowSource = "A10:a161" 'si code art selectionner la source de la combobox est collone A

End Sub

Private Sub Select_Code_chro_Click()

Liste_Code_Art_Chro.RowSource = "B10:B161" 'si code art selectionner la source de la combobox est collone B

End Sub

Étonnamment des que j’inscris le nom ou numéro de feuil ça ne fonctionne plus, bref pour le moment tous va bien ! trouve via une réponse votre part : https://forum.excel-pratique.com/excel/impossible-dedefinir-la-propriete-rowsource-t53035.html

Merci de ton aide h2SO4 !!