Discussion :

[applefield]

Bonjour,

Je souhaiterais ajouter un champ calculé "Prix Profilés" qui tient compte de 2 champs : MatièreDésignation et DébitProfiléObserv.

Le champ MatièreDésignation a des valeurs comme : E24-2, Aluminium, INOX.
Le champ DébitProfiléObserv a des valeurs comme : /__/, A, COUPE, OXY, LASER et JET D'EAU.

Je souhaiterais que :

Si DébitProfiléObserv contient "OXY" alors
PrixMatière = Matièreprix (de MatièreDésignation &" "&"OXY") * Lg Profilé

Si DébitProfiléObserv contient "LASER" alors
PrixMatière = Matièreprix (de MatièreDésignation &" "&"LASER") * Lg Profilé

Si DébitProfiléObserv contient "JET D'EAU" alors
PrixMatière = Matièreprix (de MatièreDésignation &" "&"JET D'EAU") * Lg Profilé

Je ne sais pas comment m'y prendre pour arriver à ce résultat.

Merci d'avance à tous ceux qui pourront m'aider...

[Jeannot45]

Tu pourrais créer une procédure évènementielle sur Après MAJ de DébitProfiléObserv du type

Code :

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

1
2
3
4
5
6
7
8
Select case True
   Case DébitProfiléObserv = "OXY" 
        PrixMatière = Matièreprix (de MatièreDésignation &" "&"OXY") * Lg Profilé
   Case DébitProfiléObserv ="LASER" 
        PrixMatière = Matièreprix (de MatièreDésignation &" "&"LASER") * Lg Profilé
   Case DébitProfiléObserv ="JET D'EAU" 
        PrixMatière = Matièreprix (de MatièreDésignation &" "&"JET D'EAU") * Lg Profilé
End Select

[applefield]

Merci beaucoup.
J'ai quand même une question.
Qu'elle est la différence entre If...Then...Else et Select Case?

[Jeannot45]

Je ne saurai pas te dire mais pour moi, le Select Case est plus souple à utiliser

Un seul Select Case et un seul End Select alors qu' avec les If Imbriqués il fut penser aux multiples End If

les conditions complexexs sont plus faciles à poser
tu peux indiquer des intervalles de valeurs ou des suites

Exemple

Code :

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

1
2
3
4
5
6
Select Case MaVariable
    Case is = 1 to 10,15,20
    ....
    Case else
    .....
End Select

[applefield]

Merci, je vais regarder comment appliquer ta solution.