Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1589 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Access Pb de graphique

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Access Pb de graphique

n°1428667
benco2964
Posté le 21-08-2006 à 16:13:22  profilanswer
 

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 *****************************

mood
Publicité
Posté le 21-08-2006 à 16:13:22  profilanswer
 

n°1428676
jpcheck
Pioupiou
Posté le 21-08-2006 à 16:20:57  profilanswer
 

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

n°1428683
benco2964
Posté le 21-08-2006 à 16:25:41  profilanswer
 

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...


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Access Pb de graphique

 

Sujets relatifs
Faire des graphique en camembertpb requête update Access avec equi-jointure de table
Problème date et graphiquegraphique : Courbes qui ne devraient pas commencer au point d'origine
Saut de ligne sous ACCESS dans des Label en VBAGraphique : comment faire des séries et comment ordonner mes informati
Saut de ligne sous ACCESS dans des Label en VBApositionnement graphique
Importation de donnés Excel dans Accesspremiière requête sql sous access
Plus de sujets relatifs à : Access Pb de graphique


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR