Здравствуйте.
Уже задавал подобный вопрос, но мне сказали что непонятно объясняю. Поэтому пишу - более подробно.
Есть диаграмма. На ней - обычная ломаная линия и точка.
Как макросом определить положение точки на диаграмме - используя для этого только данные, отображенные на самой диаграмме (а не данные в ячейках B4:C14 и E4:F4 по которым эта диаграмма строится) ?
И вывести результат - в ячейку D24 (то есть текст : "ВЫШЕ", "НИЖЕ" или "НАРАВНЕ")
Смысл такой: В моем примере - точка имеет ординату 6, а узел линии по той же абсциссе что и точка - имеет ординату 4.
6 > 4 , значит точка выше линии.
Для решения - можно использовать такой кусок кода:
Уже задавал подобный вопрос, но мне сказали что непонятно объясняю. Поэтому пишу - более подробно.
Есть диаграмма. На ней - обычная ломаная линия и точка.
Как макросом определить положение точки на диаграмме - используя для этого только данные, отображенные на самой диаграмме (а не данные в ячейках B4:C14 и E4:F4 по которым эта диаграмма строится) ?
И вывести результат - в ячейку D24 (то есть текст : "ВЫШЕ", "НИЖЕ" или "НАРАВНЕ")
Смысл такой: В моем примере - точка имеет ординату 6, а узел линии по той же абсциссе что и точка - имеет ординату 4.
6 > 4 , значит точка выше линии.
Для решения - можно использовать такой кусок кода:
Код |
---|
Set dg = ActiveSheet.ChartObjects("Диаграмма 1") Set sc = dg.Chart.SeriesCollection(2) yv = sc.Values xv = sc.XValues y = yv(1) x = xv(1) |