Data fra database direkte ind i chart

Hvor store datamængder drejer det sig om?
Det kan faktisk godt gøres, men kun med begrænset mængde.

Jeg vil regne med omkring 100-200 værdier.

her er med 6 x og y værdier. Hvis du selv kan udbygge er det fint, ellers kommer du igen :-)

Sub test()
  Dim ar(), at()
  ar = Array(1, 2, 3, 4, 5, 6)
  at = Array(10, 20, 30, 40, 50, 60)
  'opret nyt diagram ark
  With ActiveWorkbook.Charts.Add
      'indsæt dataserier
      With .SeriesCollection.NewSeries
        .XValues = ar
        .Values = at
      End With
      'Formater diagram
      .HasLegend = False
      .HasTitle = True
      .ChartTitle.Text = "Denne Graf's overskrift"
  End With
End Sub

Du genial :-)

Takker!

- stik et svar

/Compilos

ok :-)

Hej Bak, - Tak for hjælpen

Næsten 2 år senere -> SORRY

/Compilos