Bonjour,
INFORMATIONS concernant mon outils :
environnement : access 2003.
base de données : contient les cotations du CAC 40 et de ses 40 composantes, les codes ISIN, et les NOMS sur 3 ans
J'ai réalisé 2 requêtes qui me permettent d'obtenir les cotations des différentes actions à une date donnée (origine) et de faire la moyenne des cours pour chaque action sur une période déterminée.
Je souhaiterais mettre les informations obtenues dans un tableau afin de pouvoir réutiliser ces informations.
Au final ces informations doivent être affiché sur excel.
Voici mes 2 requetes :
Ai-je été clair ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 'Requête pour les cours à l'origine.' Sub requete_vinit(mabdd, vinit, debut) Set vinit = mabdd.CreateQueryDef("", "SELECT CAC40.NOM, COTATIONS.CODE_ISIN, COTATIONS.COURS_CLOTURE FROM CAC40 INNER JOIN COTATIONS ON CAC40.CODE_ISIN = COTATIONS.CODE_ISIN WHERE (Date = debut) ORDER BY COTATIONS.CODE_ISIN;") End Sub 'Requête pour la moyenne des cours, entre origine+1jour et fin.' Sub requete_vmoyenne(mabdd, vmoyenne, debut2, fin) Set vmoyenne = mabdd.CreateQueryDef("", "SELECT COTATIONS.CODE_ISIN, AVG(COTATIONS.COURS_CLOTURE) AS moyenne FROM COTATIONS WHERE (Date BETWEEN #debut2# AND #fin# )GROUP BY COTATIONS.CODE_ISIN ORDER BY COTATIONS.CODE_ISIN") End Sub
Je l'espère.
Partager