Discussion :

[tneyer]

Bonjour à tous,

Je viens tout juste de démarer sur VBA.

Je vous explique ma situation : J'ai 3 zones de livraison en fonction de différents codes postaux. (Zone express, Zone A, Zone B)

Je souhaite que lorsqu'un client entre sont code postal, une boite de dialogue s'ouvre en indiquant sa zone de livraison. J'ai donc inséré un textbox avec le code suivant :

Code VBA :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub TextBox1_Change()
 
        If TextBox1.Text = "21000" Or TextBox1.Text = "21110" Or TextBox1.Text = "21120" Or TextBox1.Text = "21121" Or TextBox1.Text = "21130" Or TextBox1.Text = "21160" Then
          MsgBox "VOUS ÊTES EN ZONE EXPRESS"
 
        ElseIf TextBox1.Text = "21150" Or TextBox1.Text = "21170" Or TextBox1.Text = "21190" Or TextBox1.Text = "21200" Or TextBox1.Text = "21230" Or TextBox1.Text = "21250" Then
           MsgBox "VOUS ÊTES EN ZONE A"
 
        ElseIf TextBox1.Text = "21140" Or TextBox1.Text = "21210" Or TextBox1.Text = "21330" Or TextBox1.Text = "21390" Or TextBox1.Text = "21400" Or TextBox1.Text = "21430" Then
          MsgBox "VOUS ÊTES EN ZONE B"
 
        Else
          MsgBox "VOUS ÊTES EN ZONE NON LIVRABLE"
 
         End If
 
End Sub

Mon problème : lorsque que je tape à peine le "2" pour "21000" par exemple, la boite de dialogue de zone non liverable s'ouvre. Enfaite, j'aimerai que le code attende que les 5 chiffres du code postal soient renseignés pour s'activer.

Comment faire ???

Merci d'avance.

[clementmarcotte]

Bonjour,

Bonjour à tous,

Mon problème : lorsque que je tape à peine le "2" pour "21000" par exemple, la boite de dialogue de zone non liverable s'ouvre. Enfaite, j'aimerai que le code attende que les 5 chiffres du code postal soient renseignés pour s'activer.

Comment faire ???

Merci d'avance.

Le plus simple c'est probablement de ne pas utiliser Textbox_change, mais plutôt, je dirais, checkbox_exit ou checkbox_afterupdate. en contrôlant la longueur du texte entré. Chaque fois que tu entres quelque chose dans ton textbox, l'événement Change est déclenché. Si tu tiens absolument à utiliser l'événement Change, tu peux mettre un compteur et un if pour empêcher l'exécution du code, si ton compteur n'est pas à 6, ou contrôler la longueur du texte.

P.S. Un truc simple pour te faire des amis.