Bonjour le forum,
Dans un userform, j'ai un textbox (txt16) qui indique la catégorie du salarié (employé, cadre, agent de direction) et une liste de primes en combobox5, qui dépend du statut du salarié.
Si le salarié est un employé, la liste des primes auxquelles il peut prétendre est dans la feuille Autres_données, cellules K25:K38.
Si c'est un cadre, c'est dans la feuille Autres_données, cellules K39:K50.
Enfin, si c'est un agent de direction, c'est dans la feuille Autres_données, cellules K51:K61.
En apparence, c'est très simple.
J'ai donc essayé avec le code suivant :
Private Sub Txt16_Change()
With Sheets("Autres_données")
If Txt16.Value = "Employé" Then
ComboBox5.Value = K25:K38
End If
If Txt16.Value = "Cadre" Then
"K39: k50".Value = ComboBox5.Value
End If
If Txt16.Value = "Agent de direction" Then
ComboBox5.Value ="K51:K61"
End If
End With
End Sub
Je vous ai regroupé les différents essais que j'ai faits. Mais, rien ne fonctionne : soit c'est vide, soit j'ai dans ma liste déroulante la valeur "k51:k61".
Quelqu'un pourrait-il me dire quelle est la bonne syntaxe ?
Merci d'avance.
Cordialement.
Dans un userform, j'ai un textbox (txt16) qui indique la catégorie du salarié (employé, cadre, agent de direction) et une liste de primes en combobox5, qui dépend du statut du salarié.
Si le salarié est un employé, la liste des primes auxquelles il peut prétendre est dans la feuille Autres_données, cellules K25:K38.
Si c'est un cadre, c'est dans la feuille Autres_données, cellules K39:K50.
Enfin, si c'est un agent de direction, c'est dans la feuille Autres_données, cellules K51:K61.
En apparence, c'est très simple.
J'ai donc essayé avec le code suivant :
Private Sub Txt16_Change()
With Sheets("Autres_données")
If Txt16.Value = "Employé" Then
ComboBox5.Value = K25:K38
End If
If Txt16.Value = "Cadre" Then
"K39: k50".Value = ComboBox5.Value
End If
If Txt16.Value = "Agent de direction" Then
ComboBox5.Value ="K51:K61"
End If
End With
End Sub
Je vous ai regroupé les différents essais que j'ai faits. Mais, rien ne fonctionne : soit c'est vide, soit j'ai dans ma liste déroulante la valeur "k51:k61".
Quelqu'un pourrait-il me dire quelle est la bonne syntaxe ?
Merci d'avance.
Cordialement.