Discussion :

[larsenacb]

Bonsoir, Bonjour,


Sur un formulaire, je cherche "simplement" a exécuter un module sur le champ "Bra_taille " Si la variable "Bdd_largeur" est comprise entre 2 valeur

J'ai bidouiller ce bout de code qui ne fonctionne pas "bien entendu" :

Code :

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

1
2
If (Bdd_largeur > 1,2 And Bdd_largeur < 5) Then Bra_taille = "Trés_fin"
If (Bdd_largeur > 5 And Bdd_largeur < 10) Then Bra_taille = "Grand"

Merci pour l’éventuel aide que vous m’apporterai

[Jean-Philippe André]

Salut,

L'erreur vient de la virgule au lieu du point.

tu aurais pu utiliser une structure Select Case

Code :

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

1
2
3
Select Case Bdd_largeur
Case 1.2 to 5
Case 6 to 10

mais tes valeurs se chevaucheraient

du coup tu passes par une toute petite correction de ton code

Code :

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

1
2
If (Bdd_largeur > 1.2 And Bdd_largeur < 5) Then Bra_taille = "Trés_fin"
If (Bdd_largeur > 5 And Bdd_largeur < 10) Then Bra_taille = "Grand"

[Invité]

Comme vos critères sont mutuellement exclusifs, conventionnellement on écrit :

Code :

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

1
2
3
4
5
6
7
8

If (Bdd_largeur > 1.2 And Bdd_largeur < 5) Then 
    Bra_taille = "Trés_fin"
ElseIf (Bdd_largeur > 5 And Bdd_largeur < 10) Then 
    Bra_taille = "Grand"
Endif

Attention la valeur exacte 5 n'est pas gérée ici puisque "très fin" est < à 5 et grand est > 5...

Si la valeur exacte de 5 correspond à "très fin", il faut écrire :

Code :

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

1
2
3
4
5
6
7
8

If (Bdd_largeur > 1.2 And Bdd_largeur <= 5) Then 
    Bra_taille = "Trés_fin"
ElseIf (Bdd_largeur > 5 And Bdd_largeur < 10) Then 
    Bra_taille = "Grand"
Endif

Si elle correspond à "Grand" :

Code :

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

1
2
3
4
5
6
7
8

If (Bdd_largeur > 1.2 And Bdd_largeur < 5) Then 
    Bra_taille = "Trés_fin"
ElseIf (Bdd_largeur >= 5 And Bdd_largeur < 10) Then 
    Bra_taille = "Grand"
Endif

[larsenacb]

Bsoir,

Merci beaucoup pour vos explications : It's Work !!

Bye