Discussion :

[Nikimizi]

Bonjour je suis en train d'essayer de mettre en place une syntaxe qui me permet de contrôler selon la valeur d'un champ de ma table la valeur rentrée dans le champ suivant.

Je m'explique

une valeur A est mise à jour selon des critères ( la valeur mise à jour peut être 601, 602, 603 ,604, 850 ou 400)

Selon la valeur dans mon champ A je souhaite contrôler la valeur de mon champ B

Si la valeur en A commence par 6 alors B ='abc' si mon champ A = 850 ou 400 alors B = 'def'

si ce n'est pas le cas => KO

Code :

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

iif(MABS.B= ... ,'OK','KO') as MABS.B

donc :

Code :

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

IIf(A like '6%', B = '006' ,IIf([A ='850' OR A ='400' ,B = '002' ,'ECART'))

peut-on imbriquer plusieurs iif et est-ce la solution ?

[f-leb]

bonjour,

on peut mais c'est lourd... Regarde du côté de la fonction choose().

[f-leb]

Bon, choose pt'être pas

Une autre possibilité par association (clé : valeur) dans une Collection

Code :

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
18
19
Public Function champB(clef As String) As String
 
    Dim maCollect As New Collection
    ' ajout de paires (clé : valeur)
    maCollect.Add Key:="601", Item:="abc"
    maCollect.Add Key:="602", Item:="abc"
    maCollect.Add Key:="603", Item:="abc"
    maCollect.Add Key:="604", Item:="abc"
    maCollect.Add Key:="400", Item:="def"
    maCollect.Add Key:="800", Item:="def"
 
    On Error GoTo Err
    champB = maCollect(clef) ' recherche de la valeur associée à la clé
    Exit Function
 
Err:
    champB = "KO"
    Resume Next
End Function

Code :

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

1
2
3
4
5
6
7
8
? champB("604")
abc
 
? champB("800")
def
 
? champB("n'importe quoi d'autre")
KO

ou tout bêtement avec des select ...case..., faut voir selon tes données réelles.

[Nikimizi]

OK je vous remercie au final j'ai fonctionner en IIF X and Y or X and Z OK ECART...

Beaucoup plus simple je ne sais pas pourquoi ne pas y avoir pensé plus tôt ... le retour des vacances