Discussion :

[JeremieT]

Bonjour à tous,

Je vous expose mon problème.
J'ai une table contenant x champs dont 4 sont [Desi_client], [CADToD], [DiffDToDMoinsUn], [ImporRel].
J'aimerais via une requête maj, dans le code de mon formulaire, mettre à jour le champ [ImporRel] avec la formule suivante :
[ImporRel]=(([CADToD]/Somme[CADToD])*[DiffDToDMoinsUn]).

Traduit brutalement en vba donnerait :

Code :

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

oDB.Execute "UPDATE tbl1 SET tbl1.ImporRel = ([CADToD]/(SELECT Sum(tbl1.CADToD))*[DiffDToDMoinsUn])"

Vous comprendrez bien qu'il y a un pb avec l'instruction SELECT dans l'instruction UPDATE ! (erreur 3141) :-)

Et là je ne vois pas de pistes possible pour l'instant !

D'avance merci pour votre coup de main.

@+

[LedZeppII]

Bonjour,

on doit pouvoir remplacer la sous-requête par DSum(..)

Code vba :

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

1
2
oDB.Execute "UPDATE tbl1 SET tbl1.ImporRel = " & _ 
"([CADToD]/DSum(""CADToD"", ""tbl1"")*[DiffDToDMoinsUn])"

Je pense que DSum est disponible dans Access97.

A+

[JeremieT]

Bonjour à tous !

Bien joué LedZepp, tu as tout compris à mon pb et l'a résolu en un rien de tps ;-)

Merci encore !
@+