Bonjour à tous,

Je souhaiterais savoir ce que vous utilisez comme code VBA pour tout ce qui est test de saisie dans les zones d'édition, à savoir par exemple si une référence devant être renseignée contient bien 8 chiffres.
J'utilise ceci dans le cas où ma zone d'édition se nomme TxtRef :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
Private Sub TxtRef_Change()
 
  With TxtRef
    If Len(.Text) < 8 or Len(.Text) > 8 Then
       MsgBox("Référence sur 8 positions", vbYesNo + vbInformation)
   End If
  End With
 
End Sub
Mais il doit y avoir une meilleure solution...
merci.