Постройка графика на листе Excel - VB
Формулировка задачи:
следующим кодом пытаюсь построить график в экселевском файле на листе 'Grafics'
но график почему-то строится на листе результатов('Results').
Подскажите в чем ошибка.
И второй вопрос:что такое выключить/включить
сообщения
для чего это вообще нужно и куда их ставить в программе.
Решение задачи: «Постройка графика на листе Excel»
textual
Листинг программы
Dim wsheet As Worksheet
Dim Charts As ChartObjects
Dim Chart As ChartObject
Set wsheet = ActiveSheet
wsheet.Name = 'Grafics'
Set Charts = wsheet.ChartObjects
Set Chart = Charts.Add(0, 0, 200, 200)
With Chart.Chart
.ChartType = xlXYScatterLines
.SetSourceData Source:=Sheets('Grafics').Range('A1'), PlotBy:=xlColumns
.SeriesCollection.NewSeries.XValues = Worksheets('Results').Range('B1:B5')
.SeriesCollection.NewSeries = Worksheets('Results').Range('C1:C5')
.Location Where:=xlLocationAsObject, Name:='Grafics'
End With