Contrainte saisie dans combox

C

CHALET53

XLDnaute Barbatruc

• 2 Février 2016

• #2

Re : Contrainte saisie dans combox

bonjour

A priori les points 2 et 3 sont réalisés
Pour le point 1 :

For Each ctrl In Controls
If ctrl = "" Then MsgBox ("toutes les zones doivent être remplies"): Exit Sub
Next

Derrière Sheets("Feuil1").Select

a+

 

Vote positif 0 Vote négatif

Chris24

XLDnaute Impliqué

• 2 Février 2016

• #3

Re : Contrainte saisie dans combox

Bonjour,

Au lieu de contrôler s'il y a doublon de matricule lors de la validation, tu peux le faire directement à la frappe dans le champ Matricule.

Déplace le test dans la procédure Matricule_Change()


Cordialement

 

Vote positif 0 Vote négatif

N

Nyepalo

XLDnaute Junior

• 2 Février 2016

• #4

Re : Contrainte saisie dans combox

Merci de vos promptes réactions Chris24 et CHALET53

Chris24, j'accepte ta proposition mais je ne sais l'écrire.
CHALET53, le contrôle marche.

Merci à tous,

 

Vote positif 0 Vote négatif

Chris24

XLDnaute Impliqué

• 2 Février 2016

• #5

Re : Contrainte saisie dans combox

Dans ton formulaire clic droit sur le champ Matricule, clic sur code ce qui t'amène directement dans la procédure Matricule_Change.

Déplace ce code qui est dans ta procédure b_validation_Clik ()

Set result = Range("A3:A1000").Find(What:=Me.Matricule, LookIn:=xlValues, LookAt:=xlWhole)
If Not result Is Nothing Then
MsgBox "Existe déjà"
Exit Sub
End If

Dans la procédure Matricule_Change ()

Bonne journée

 

Vote positif 0 Vote négatif

N

Nyepalo

XLDnaute Junior

• 3 Février 2016

• #6

Re : Contrainte saisie dans combox [RESOLU]

Bonjour le forum,

Merci à tous, mon problème a trouvé solutions.

A+

 

Vote positif 0 Vote négatif