Добрый день!
Подскажите, есть ли возможность определить какие линии на диаграмме выбраны (т.е. выделены мышкой).
Доступ к созданной диаграмме есть (диаграмма расположена на рабочем листе), а вот какое свойство отвечает за состояние линии (выделено = true, обратное = false) так и не смог найти.

Dim myChart As ChartObject
If myChart.Chart.SeriesCollection(myChart.Chart.SeriesCollection.Count).Select = True Then

Этот код работает, но он сначала выделяет линию и затем заходит в условие.
Вместо select пробовал selection и даже activate, не работают такие свойства((.

Заранее благодарен за советы

Доброго дня!
Может кто подскажет, как правильно записать параметры пользовательской функции function myFunction (?????), чтобы при вызове функции можно было получить такое же окно для ввода, как при вызове функции СЧЁТЕСЛИМН() (прикрепил рисунок). И вообще, возможно ли такое? Пробовал ParamArray, но это не совсем подходит.

Заранее благодарен за помощь!

Добрый день!

Возникла потребность построить диаграмму с осью Х, на которой информация размещается в 2 ряда (первый - год, второй - месяцы). Рисунок во вложении.
Проблема в следующем:
myChart.SeriesCollection(1).XValues = Worksheets("Sheet1").Range("C6:I7") делает расстановку на оси Х верно (год и месяцы),а вот если это сделать при помощи массива (код ниже), то желаемого результата не получается
massX = Worksheets("Sheet1").Range("C6:I7")
myChart.SeriesCollection(1).XValues = massX
может кто знает, какой размерности должен быть массив и как в нем должны храниться данные?

так же прикладываю файл с диаграммой и макросом! Заранее благодарен!

Добрый день, форумчане!
Подскажите, есть ли возможность создать пустую диаграмму средствами VBA?

Дело в том, что на листе очень много данных и выдается ошибка о невозможности создания диаграммы (The maximum number of data series per chart is 255). Выделять ячейки заранее не хочется.

В планах сделать так:
1. Получить объект диаграмм, что-то вроде
                     Set myChart = ActiveSheet.Shapes.AddChart()
                     только без привязки к ячейкам или что-то вроде:
                      Set myChart = ActiveSheet.Shapes.AddChart("A1:A1") - но такого конструктора, как я понял, нет.
2. Затем создать массивы с данными и присвоить эти данные диаграмме.

Проблема именно в получении объекта (пустой диаграммы).