Update table avec condition

Bonjour,

Je cherche à créer une fonction en vba pour mettre à jour un champ d'une table.

La fonction :

Code:

---

1 2 3

Function Test1() CurrentDb.Execute "UPDATE Produit SET Marque = if(left(Article,1)='$' or '&';'Marque1';'Marque2'));" End Function

---

En gros si le code article commence par $ ou par & ma marque doit être Marque1 sinon Marque2.

Merci de vos conseil.

Bonjour,
la bonne fonction est IIF, et non pas IF ;)
de plus, la clause OR est mal rédigée.

Essaie avec ceci :

Code:

---

1 2 3

Function Test1() CurrentDb.Execute "UPDATE Produit SET Marque = iif(left(Article,1)='$' or left(Article,1)='&','Marque1','Marque2');" End Function

---

Bonjour,

Pourquoi ne pas utiliser que du SQL :

Code:

---

1 2 3 4 5

Function Test1() CurrentDb.Execute "UPDATE Produit SET Marque = ""Marque1"" WHERE Article LIKE ""$*"" OR Article LIKE ""&*"";" CurrentDb.Execute "UPDATE Produit SET Marque = ""Marque2"" WHERE Article NOT LIKE ""$*"" AND Article NOT LIKE ""&*"";"   End Function

---

Merci beaucoup pour vos réponses. Elles me sont bien utiles.

si ces propositions de solutions résolvent ton problème, n'oublie pas de l'indiquer en taggant la discussion en cliquant sur :resolu: en bas de la page ;)