code qui permet générer du graphique sur Vb à partir d'access ou excel

Bonjour,

j'ai une application VBA, je voudrais savoir comment générer du graphique (histogrammes,...) à partir d'une base access ou d'un fichier excel.

Ce que je veux savoir exactement, c'est les fonction VB qui permettent l'accès à un fichier Excel (ouverture, fermeture, création,...) et s'il ya des fonctions VB ou des Macros qui génèrerent à partir de fichiers Excels ou une bases Access des graphiques qu'on pourra afficher sur l'interface VB .

si quelqu'un pourra m'éclairer!!!!

merci d'avance

N'oublie pas de cocher dans Projet/Références, la case Microsoft Excel x0 Object Library et de placer un contrôle MSChart sur ta Form.

Cet exemple utilise les cellules de A1 à B8 d'un classeur Excel, en B1 , j'ai mis Semaine 1
en A2 Lundi, A2 Mardi ect...jusque Dimanche. De B2 à B8 j'ai mis des nombres, 350, 265,245, ect....

Private Sub Command1_Click()
Set wkbObj = GetObject _
("C:\Mes documents\Classeur1.xls")

Dim arrData(1 To 7, 1 To 2)
Dim i As Integer
For i = 1 To 7
   ' Les valeurs de la colonne A remplissent la première
   ' série du tableau. Si ces valeurs sont des chaînes,
   ' elles deviennent des étiquettes de lignes.
   Dim arrValues(1 To 5, 1 To 3)
    arrData(i, 1) = wkbObj.Worksheets(1) _
   .Range("A" & i + 1).Value

   ' Les valeurs de la colonne B remplissent ensuite la seconde série.
   arrData(i, 2) = wkbObj.Worksheets(1) _
   .Range("B" & i + 1).Value
Next i
MSChart1.ChartData = arrData
End Sub


jpleroisse

merci bcp jpleroisse:
c'est très gentil de ta part
a+
Cordialement
MNASRI Riadh