Создание диаграммы на основе массива

[Grossu]

Возможно ли создать диаграмму в EXCEL на основе какого-нибудь массива? Массив представляет собой некие данные взятые с формы. И принадлежит типу Double.
Или все-таки придется массив переносить сначала на скрытый лист, и с него уже строить диаграмму (скажу откровенно, этот вариант меня не очень устраивает).
Заранее спасибо.

[uhm]

Можно. Добавляешь пустой чарт, потом делаешь что-то вроде:

Код: Выделить всё

    ActiveChart.SeriesCollection.NewSeries
    ActiveChart.SeriesCollection(1).Values = "={твои значения через запятую}"


В Values нужно записать строку, в которой будет написано "=", а дальше внутри фигурных скобок через запятую значения элементов твоего массива.

[Grossu]

Массив в виде mydata(i) может содержать порядка ста элементов. Правильно ли я понимаю, что нужно писать [mydata(1), mydata(2) .... mydata(n)]. Или есть более вменяемый способ. Через For Next не получается.

[gacol]

Можно прямо задать имя массива
Dim X(80) As Integer
ActiveChart.SeriesCollection(1).Values = X
Но с сотней элементов не проходит.

Похожее обсуждали на
http://forum.codenet.ru/showthread.php? ... adid=22761

[uhm]

Ну уж и не получается...

Код: Выделить всё

mystring="={" & CStr(mydata(1))
For i=2 to UBound(mydata)
  mystring=mystring & "," & CStr(mydata(i))
Next i
mystring=mystring & "}"

ActiveChart.SeriesCollection(1).Values = mystring




[Grossu]

Ну уж и не получается...

Код: Выделить всё

mystring="={" & CStr(mydata(1))
For i=2 to UBound(mydata)
  mystring=mystring & "," & CStr(mydata(i))
Next i
mystring=mystring & "}"

ActiveChart.SeriesCollection(1).Values = mystring




Спасибо. Действительно все получилось. Но до чего же хитроумный способ. Не очень гибко - неужели нет в VBA более достойного механизма.