Discussion :

[LouiMz]

Bonjour,

Je viens vers vous car, suite à mon problème d'hier ici je galère sur la conversion de cette requête en chaine de caractère. (Utilisation en VBA)

Mon but et d'obtenir une requête d'analyse croisée, de manière à faire varier dynamiquement un graphique (dans un formulaire) en fonction des valeurs des ComboBox de ce même formulaire (annee et semaine).

Pour ce faire, je supprime, à chaque fois, la requête pour la recréer avec les nouvelles valeurs des ComboBox (en VBA).

Mode Création (merci à User):

Code :

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

DSum("[Quantité]" ,"[Matable]","[Type]= '" & [Type] & "' and [Semaine] <= " & [Semaine])

VBA du formulaire:

Code :

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

1
2
3
SQL = "TRANSFORM DSum([Quantité],[Matable],[Type] = '" & [Type] & "' AND [Semaine] <= " & [Semaine] & " ) AS tSomme " & _
 .... 
 ....

Seul le TRANSFORM me pose probleme. En effet je recois une erreur 2465 (Access ne trouve pas le champ '|' auquel il est fait référence). En utilisant des espions sur les différentes valeurs, j'ai l'impression qu'il ne reconnait pas les deux valeurs [Semaine] et [Type].

J'ai essayé d'utiliser l'ADO mais je n'y connais pas grand chose ...

Auriez-vous une idée ou une piste à me donner ? Car je suis dessus depuis ce matin et je galère royalement.

Je vous remercie par avance

EDIT : j'abandonne cette idée ^^

[loufab]

Bonjour,

Ceci :

Code :

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

DSum("[Quantité]" ,"[Matable]","[Type]= '" & [Type] & "' and [Semaine] <= " & [Semaine])

devient cela :

Code :

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

"... DSum([Quantité],[Matable],[Type] = '" & [Type] & "' AND [Semaine] <= " & [Semaine] & " ) AS tSomme "

Tu oublis des caractères importants lors de ton adaptation.

Les " sont importants. Dsum attend des paramètres String et non les champs.

Cordialement,

[LouiMz]

Bonjour,

Heu en fait je ne vois pas trop la différence entre mon code :

Code :

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

"TRANSFORM DSum([Quantité],[Matable],[Type] = '" & [Type] & "' AND [Semaine] <= " & [Semaine] & " ) AS tSomme "

Et le votre :

Code :

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

"... DSum([Quantité],[Matable],[Type] = '" & [Type] & "' AND [Semaine] <= " & [Semaine] & " ) AS tSomme "

Sinon ne vous embettez pas, j'ai trouvé une solution de substitution.

Mais je vous remercie d'avoir pris sur votre temps pour me repondre.

[loufab]

Bonjour,

C'est sur qu'avec ce que tu postes tu risques pas d'en voir... Etant donné que tu postes la même chose, avec la même omission soit dit en passant.

Allez ! je t'aide puisque tu as besoin de lunettes :

Code :

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

1
2
DSum("[Quantité]" ,"[Matable]","[Type]= '" & [Type] & "' and [Semaine] <= " & [Semaine])
DSum([Quantité],[Matable],[Type] = '" & [Type] & "' AND [Semaine] <= " & [Semaine] & " ) AS tSomme "

Tu ne vois pas un petit décalage avec un léger changement de couleur ?

Cherches Dsum dans l'aide et regarde le tuto sur les fonctions de domaine.

Cordialement,

[LouiMz]

Re,

Bon je crois que nous ne nous comprenons pas ^^ Ma question ne portait pas sur DSUM

De plus j'avais déjà essayé cette forme et je galérais juste sur son affectation dans une variable Texte ^^ mon code SQL fonctionne très bien ...

Code :

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

1
2
 
SQL = "TRANSFORM DSum("[Quantité]","[Matable]","[Type] = '" & [Type] & "' AND [Semaine] <= " & [Semaine] & " ) AS tSomme "

C'est pour cette raison que j'ai essayé pas mal de formes différentes dont une où je retirais les guillemets :

Alors qu'il s'agissait juste d'un oubli de guillemets supplémentaires et non pas une demande de cours sur les fonctions de domaines.

Merci en tout cas d'avoir pris sur votre temps pour me répondre à nouveau

[loufab]

Bonjour,

Désolé de ne pas avoir su deviner ton problème. Je vais de ce pas m'inscrire à des cours d'extispicine.

Je t'aurais bien proposé un tuto supplémentaire sur le débogage des requêtes en VBA, mais j'ai peur que tu te fâche définitivement.

Cordialement,