faire un graphique sur excel à partir d'une base de donnée access via une requete
Bonjour à tous
Je vais expliquer plus clairement mon problème. J'aimerai pouvoir faire des graphiques sur un fichier excel, via des données qui sont sur une base access sans passer par le copie de la requete dans un range sur un feuillet excel... J'ai cherché sur internet, je n'ai rien trouvé à ce sujet qui puisse m'aider... alors j'ai tenté naïvement quelques astuces au début en mettant carrément la requête comme définition mais évidemment ça n'a pas marché... La dernière astuce que j'ai trouvé, c'était faire croire que je rentrais les données à la main mais ça ne fonctionne pas non plus, si quelqu'un sait si y a une manière propre, ou s'il y a une astuce ? Je vous mets mon dernier code là :
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
| Dim entree As Date, sortie As Date, part As String, plage As String, plage1 As String
entree = Range("J10")
sortie = Range("J11")
part = Range("J9")
srequete = "SELECT * FROM PORTEFEUILLES_PARTS WHERE DT BETWEEN #" & entree & "# AND #" & sortie & "# AND trim(TYP_PART)='" & part & "' order by DT desc "
Set rs = New ADODB.Recordset
rs.Open srequete, cncon, adOpenDynamic, adLockOptimistic
If rs.EOF = False Then
rs.MoveFirst
plage = ""
plage1 = ""
While rs.EOF = False
plage = rs("PART") & "." & plage
plage1 = "" & rs("DT") & ";" & plage1 & ""
rs.MoveNext
Wend
ActiveSheet.ChartObjects("Graphique 1").Activate
ActiveChart.SetSourceData Source:=" & plage & " |
J'ai aussi essayé avec :
Code:
ActiveChart.SeriesCollection(2).Values = plage
Merci de vos lumières