Access Pb de graphique

Access Pb de graphique - VB/VBA/VBS - Programmation

Marsh Posté le 21-08-2006 à 16:13:22    

Bonjour à tous.
 
   J'ai un code qui m'exécute une requête directement dans VBA. J'aimerais savoir quel genre de code je dois générer pour qu'il affiche les résultats de ma requête directement dans un graphique. Je ne vois pas comment le faire, et je ne sais même pas si c'est possible! En gros, ma requête va me chercher un nombre de commandes ar mois. J'aimerais que Access m'affiche un graphique avec les résultats de cette requête en histogramme. Et, si c'est possible, j'aimerais alors pouvoir afficher plusieurs infos pour un même mois.  
Merci d'avance!
 
Voici mon code :
 
Private Sub Form_Open(Cancel As Integer)
    '********* Début : Déclaration des variables **********************************
 
    Dim oDb As DAO.Database
    Dim oRst As DAO.Recordset
    Dim SqlReq1 As String
     
    '********* Fin   : Déclaration des variables ***********************************
 
    '********* Début : Recherche des enregistrements de la table Tb_anomalies ***********
    Set oDb = CurrentDb
    SqlReq1 = "SELECT Tb_anomalies.Date_estimee, Tb_anomalies.Date_cloture, " & _
                     "Count(Tb_anomalies.Date_estimee) AS Nb " & _
                     "FROM Tb_anomalies " & _
                     "WHERE (((Tb_anomalies.Date_estimee) Is Not Null) " & _
                     "AND ((Tb_anomalies.Date_cloture <= Tb_anomalies.Date_estimee))) " & _
                     "GROUP BY Date_estimee, Date_cloture"
     
    Set oRst = oDb.OpenRecordset(SqlReq1)
         
    '********* Début : Récupération des infos de la table Tb_anomalies ***************
'Seulement en test pour l'instant
 
    While Not oRst.EOF
        MsgBox ("Date estimée = " & oRst.Fields(0).Value)
        oRst.MoveNext
    Wend
     
    '********* Début : Libération des objets *****************************
    oRst.Close
    oDb.Close
    Set oRst = Nothing
    Set oDb = Nothing
    '********* Fin   : Libération des objets *****************************

Reply

Marsh Posté le 21-08-2006 à 16:13:22   

Reply

Marsh Posté le 21-08-2006 à 16:20:57    

ACCESS je ne maitrise pas, mais tu peux faire une manip en utilisant Excel aussi, pour tes graphes notamment.

Reply

Marsh Posté le 21-08-2006 à 16:25:41    

En fait, le but est de l'intégrer dans une base ACCESS afin de globaliser toutes les infos au même endroit justement. En effet, il me manque juste la possibilité d'intégrer ce graphique et de pouvoir le maîtriser par VB pour réussir. Merci quand même pour ta réponse!Si quelqu'un d'autre a une petite idée...

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed