cathodique
XLDnaute Barbatruc
Bonjour,
Pour illustre mon problème j'ai fait ce fichier joint très simplifié. Je voudrai faire une sorte de validation de données dans mon userform, c-à-d si la textBox est vide, on ne pourra saisir que certaines valeurs et ce suivant le contenu de la comboBox. les conditions sont les suivantes:
1- si combobox1=A alors textbox1 ne doit accepter que PPTC, PPT
2- si combobox1=B alors textbox1 ne doit accepter que PCTE, SPT, ADF
3- si combobox1=C ou D ou E alors textbox1 ne doit accepter que PC, PP, PA
je n'ai mis que quelques valeurs que peut prendre la textBox pour simplifier.
J'ai pensé à un select case, mais je ne m'en sors pas. je fais donc appel à votre précieuse aide en vous remerciant.
Pour illustre mon problème j'ai fait ce fichier joint très simplifié. Je voudrai faire une sorte de validation de données dans mon userform, c-à-d si la textBox est vide, on ne pourra saisir que certaines valeurs et ce suivant le contenu de la comboBox. les conditions sont les suivantes:
1- si combobox1=A alors textbox1 ne doit accepter que PPTC, PPT
2- si combobox1=B alors textbox1 ne doit accepter que PCTE, SPT, ADF
3- si combobox1=C ou D ou E alors textbox1 ne doit accepter que PC, PP, PA
je n'ai mis que quelques valeurs que peut prendre la textBox pour simplifier.
J'ai pensé à un select case, mais je ne m'en sors pas. je fais donc appel à votre précieuse aide en vous remerciant.
Code:
Private Sub UserForm_Initialize()
ComboBox1.AddItem "A"
ComboBox1.AddItem "B"
ComboBox1.AddItem "C"
ComboBox1.AddItem "D"
ComboBox1.AddItem "E"
Select Case outil
End Select
End Sub