Discussion :

[Bernard67]

Bonjour le forum,
J'ai une 10 de requetes MAJ sur le meme champ, en SQL cela donne ceci :

Code :

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

1
2
3
4
UPDATE tbl_archives SET tbl_archives.dossier = "EN COURSE"
WHERE (((tbl_archives.dossier)="EN COURS"));
UPDATE tbl_archives SET tbl_archives.dossier = "REFUSEE"
WHERE (((tbl_archives.dossier)="REFUSE"));

Est il possible de regrouper toutes ces requetes Mise a jour au moyen de VBA.
Merci pour l'aide et bonne AM

[nico84]

Bonjour

Il est possible de faire une table "dictionnaire" et faire un update sur les 2 tables jointes :

Code :

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

update table inner join dico on table.champ=dico.old set table.champ=dico.new

[Bernard67]

Merci Nico84,
Ne serait il pas possibble par VBA avec un replace ?

[nico84]

Je ne vois comment éviter 10 replace ou un case qui seront beaucoup plus long à exécuter

Il est possible de faire un iif(iif(iif(... mais c'est pas très lisible !

[Jean-Philippe André]

salut,
est-ce un hasard ou bien il faut juste enlever le E de la fin dans la mise à jour ?

[Bernard67]

Bonsoir jpcheck,nico84 le forum,

C'est un hasard si il faut supprimer le E final.
J'ai une 10 de codes qui arrivent avec 4 lettres dans le meme champ,(Cela fait plusieurs centaines de lignes) il faut que je fasse une equivalence. Ce n'est pas toujours la 1ere ou la derniere lettre qu'il faut supprimer;
par exemple

ABCD = BCD
QDES = AZE
FORM = FOR

merci pour le coup de main.
Bonne soirée

[Jean-Philippe André]

approche la moins contraignante :
- faire une table avec deux champs
>Ancienne_Val
>Nouvelle_Val

Avec une seule requête UPDATE avec une jointure sur Ancienne_Val et un set vers Nouvelle_Val

[Bernard67]

Bonjour,
Merci pour vos solutions.
Je fais effectivement une table avec les anciennes et nouvelles valeurs.
C'est la solution la plus simple.
Merci jpcheck et nico84
Bonne journée à tous.
Cordialement