Discussion :

[dontdriveatruck]

Bonjour,

Alors cette fois j'essaie de tout faire nickel !!!

Déjà je présente mon problème. J'ai une grosse table avec des champs
NOMPRENOM ANNEE SEMAINE AFF HT

J'ai créé une requête qui, lorsque les champs NOMPRENOM, ANNEE et SEMAINE sont identiques, fait la somme du champs HT et calcule 2 nouveaux champs HP et COEFFP :

Code :

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

1
2
3
SELECT BILANPERS.NOMPRENOM, BILANPERS.ANNEE, BILANPERS.SEMAINE, Sum(BILANPERS.HT) AS SommeDeHT, IIf(Sum(BILANPERS.HT)<=39,Sum(BILANPERS.HT),IIf(Sum(BILANPERS.HT)>47,(Sum(BILANPERS.HT)-47)*1.5+49,(Sum(BILANPERS.HT)-39)*1.25+39)) AS HP, HP/Sum(BILANPERS.HT) AS COEFFP
FROM BILANPERS
GROUP BY BILANPERS.NOMPRENOM, BILANPERS.ANNEE, BILANPERS.SEMAINE;

J'aimerais lancer cette requête depuis un bouton auquel est associée une macro et récupérer pour chaque trio (NOMPRENOM,ANNEE,SEMAINE) identique la valeur de COEFFP correspondante.

Comment faire ?

J'ai tenté la commande

Code :

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

DoCmd.OpenQuery

mais ça ne m'avance pas pour récupérer la valeur du champ COEFFP.

Merci d'avance !

P.S. : j'ai crû comprendre qu'il y avait une histoire d'ADO (j'utilise access 2003) mais je n'ai rien compris !!!

[jimay]

Bonjour,

En VBA access, la commande docmd.OpenQuery ne peut être utilisée que pour des requêtes d'action ( Update, Insert, Delete...)
Si tu veux effectuer une requete de sélection tu peux utiliser les recordset

Code :

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

1
2
3
4
5
6
7
8
9
dim rs as recordset
dim requete as string
 
requete = "SELECT * FROM CLIENT")
set rs = curentDB.openrecordset(requete)
 
msgbox rs.field("Nom") & "  " & rs.field("Prenom")
 
rs.close

voilà un petit exemple. j'espère qu'il pourra t'être utile.


PS: si ta requete renvoie plusieurs résultats tu peux les traiter dans une boucle foreach.
rePS: j'ai tapé le code un peu rapidement, il pourrai y avoir des fautes de frappe

[=JBO=]

Bonjour,

Alors cette fois j'essaie de tout faire nickel !!!

Merci, nous apprécions vraiment quand un problème est bien exposé.

J'aimerais lancer cette requête depuis un bouton auquel est associée une macro et récupérer pour chaque trio (NOMPRENOM,ANNEE,SEMAINE) identique la valeur de COEFFP correspondante.

Comment faire ?

Tu devrais nous expliquer ce que tu entends par "récupérer".
En effet, cela va forcément orienter notre réponse.

Alors "récupérer" comment ?
En les ajoutant dans une table, par exemple ?
_

[dontdriveatruck]

Alors en fait j'entends par "récupérer" le champ COEFFP, pouvoir utiliser la valeur COEFFP pour chaque triplet (NOMPRENOM,ANNEE,SEMAINE) pour multiplier un champ dans une autre table.

En gros pour t'expliquer le principe :

Pour chaque personne (NOMPRENOM) et pour chaque semaine de l'année (SEMAINE,ANNEE) j'ai un nombre d'heures effectuées. Je veux obtenir le nombre d'heures pondérées en fonction des heures sup payées à 25% ou 50% de plus. Donc en fonction du nombre d'heures je calcule COEFFP et en suite je multiplie le nombre d'heures effectuées par COEFFP pour obtenir le nombre d'heures pondérées.

Je suis clair ?!

[=JBO=]

Alors en fait j'entends par "récupérer" [...]

Je suis clair ?!

Ce que j'ai compris:

Tu as créé une requête de regroupement de données qui donne une liste d'enregistrements (avec NOMPRENOM, ANNEE, ADRESSE... et le fameux COEFFP).

Tu souhaites utiliser la valeur de ce champ COEFFP pour multiplier la valeur d'un champ d'une table (peut-être est-ce encore la table BILANPERS ?), étant entendu que le rapprochement des enregistrements Requête-Table se fait sur les champs NOMPRENOM, ANNEE, SEMAINE.

Si j'ai bien compris, alors il me semble que tu dois créer une nouvelle requête sélection qui réalise une jointure entre:
- la première requête-COEFFP et
- la table où se trouve la valeur "cible" (la table BILANPERS ?).
Dans cette nouvelle requête sélection, il faut créer un champ "nombre d'heures pondérée" qui effectue l'opération à partir du champ COEFFP de ta requête et le champ "cible" de la table (peut-être est-ce le champ BILANPERS.HT ?)

Le bouton sera alors utilisé pour exécuter la nouvelle requête et afficher le résultat, dans une feuille de données, par exemple.
_

[dontdriveatruck]

Je suis désolé de ne pas avoir répondu plus tôt. J'ai une grosse affaire en cours alors je ne me suis plus penché sur ça. Mais dès que je me remets le nez dedans je te tiens informé.

Merci pour l'aide.