[EXCEL] Afficher valeur textbox en fonction de combobox Résolu

Question

Bonjour à tous, 
J'ai une combobox (combobox1) dont le rowsource se fait par choix d optionbutton juste avant.
Je voudrais afficher une valeur dans des textbox en fonction de la valeur choisi dans mon combobox
J'ai commencé par ceci que j'ai récupérer sur le net ( je l'ai mis dans combobox1_change)


Sheets("Barbazan").Activate
Dim a As Integer
For a = 1 To 9999
If Val(Usf_Base.ComboBox1.Value) = Sheets("Barbazan").Range("B" & a).Value Then
Usf_Base.TextBox4.Value = Sheets("Barbazan").Range("A" & a).Value
Usf_Base.TextBox5.Value = Sheets("Barbazan").Range("C" & a).Value
GoTo fin:
End If
Next
fin:


Si cela ne me génère pas d'erreur, cela ne marche pas pour autant.
Quelle est mon erreur dans ce code svp ?

Merci



Configuration: Windows 7 / Chrome 25.0.1364.152

ced3c · Accepted Answer

Petite explication pour ceux qui comme moi ne sont pas très compétent en excel
Apparemment en essayant dans ce code, le "val" est a mettre si la combobox contient des nombres.
Si la combobox contient des lettres ou mots il faut l enlever

En espérant en avoir aidé quelques uns ^^

ced3c · Answer

apparement en effacant "val" cela marche


Sheets("Barbazan").Activate
Dim a As Integer
For a = 1 To 9999
If Usf_Base.ComboBox1.Value = Sheets("Barbazan").Range("B" & a).Value Then
Usf_Base.TextBox4.Value = Sheets("Barbazan").Range("A" & a).Value
Usf_Base.TextBox5.Value = Sheets("Barbazan").Range("C" & a).Value
GoTo fin:
End If
Next
fin:


désolé du dérangement ^^

[EXCEL] Afficher valeur textbox en fonction de combobox

2 réponses

Votre réponse

Discussions similaires