Aide code VBA

bonsoir

je suis en train de créer un classeur clients(vba)

avec les code nom, adresse, ville, etc ......aucun problème

c'est avec les numériques que je cale voici le début de mon code pour une entre code client:

Private Sub champ_code_clients_AfterUpdate()

'On test si la saisie est un nombre

If Not IsNumeric(champ_code_clients) Then

MsgBox "Vous devez entrer un code client", , "Saisie incorrecte"

je veux que les entres soit numérique (fait, je pense) et je voudrais limité ses entre a 6 chiffrés avec message d'erreur si trop ou pas assez de chiffre

idem code poste et télephone(10 chiffre --/--/--/--/--)

merci a tous de nos lumieres

bonne soirée

bonsoir,

tu peux tester la longueur d'une saisie avec l'instruction IF len(x)

IF len(Champ_code_clients)<>6 then msgbox "vous devez introduire 6 chiffres"

bonsoir

je vais teste sa et je vous tient ai courant

merci

sa marche nickel merci

Rechercher des sujets similaires à "aide code vba"