Bonjour les amis du forum,
Dans un USJ j'ai un combobox (combobox4) alimenté par une rowsource = etat. (les valeurs définies sont: "en-cours", "résilié").
Je tente d'obliger la saisie du combobox par msgbox.
J'ai inséré le code suivant (recopié quelque part sur cet excellent forum) :
For Each ctrl In Me.MultiPage1.SelectedItem.Controls
Select Case ctrl.Name
Case "ComboBox4"
If ctrl = "" Then
MsgBox "Il faut renseigner l'état !"
ctrl.SetFocus
Exit Sub
Else
ComboBox4 = ctrl.RowSource
End If
Le msgbox fonctionne mais lorsque que je saisi une valeur dans le combox (donc soit "en-cours" ou "résilié"), après avoir validé la saisie il est reporté la valeur "etat" dans ma base de donnée en lieu et place de la valeur qui a été effectivement saisie ("en-cours" ou "résilié").
Merci de votre aide
Cordialement
Dans un USJ j'ai un combobox (combobox4) alimenté par une rowsource = etat. (les valeurs définies sont: "en-cours", "résilié").
Je tente d'obliger la saisie du combobox par msgbox.
J'ai inséré le code suivant (recopié quelque part sur cet excellent forum) :
For Each ctrl In Me.MultiPage1.SelectedItem.Controls
Select Case ctrl.Name
Case "ComboBox4"
If ctrl = "" Then
MsgBox "Il faut renseigner l'état !"
ctrl.SetFocus
Exit Sub
Else
ComboBox4 = ctrl.RowSource
End If
Le msgbox fonctionne mais lorsque que je saisi une valeur dans le combox (donc soit "en-cours" ou "résilié"), après avoir validé la saisie il est reporté la valeur "etat" dans ma base de donnée en lieu et place de la valeur qui a été effectivement saisie ("en-cours" ou "résilié").
Merci de votre aide
Cordialement