Création de graphique

Bonjour,

Je souhaite alimenter ActiveChart.SeriesCollection(1).Values à partir d'une requête PostgreSQL.

req = "SELECT col1,col2,col3 FROM ma_table;"

Set rs = New ADODB.Recordset

With rs

.ActiveConnection = cn

.Open req

iLig = 1

While Not .EOF

tTab(iLig) = .Fields(0).Value

iLig = iLig + 1

.MoveNext

Wend

.Close

End With

Set rs = Nothing

ActiveSheet.Shapes.AddChart.Select

ActiveChart.ChartType = xlLine

ActiveChart.SeriesCollection.NewSeries

ActiveChart.SeriesCollection(1).Name = "% de blocs écrits par les Checkpoints"

ActiveChart.SeriesCollection(1).Values = tTab

Est-ce possible ?

D'avance merci pour votre aide.

Bonjour,

Personne n'a déjà pratiqué ce genre d'exercice ?