Точка на графиках

[zot315]

Вечер добрый всем!
Подскажите, возможно ли проделать следующее: есть две точечные диаграммы, первая построена, например, по столбцам А и B, вторая по столбцам С и D. Задача - щелкнув мышью по точке на одной диаграмме, например это точка с координатами из ячеек А10, B10, изменить ее цвет и размер, и при этом чтобы на второй диаграмме точка с координатами из ячеек С10, D10 также изменила свой цвет и размер (т е речь идет о ячейках из одной строки). Спасибо)

[IgorGO]

возможно

[zot315]

Долго искал в сети, нашел даже вопросы типа "Если на диаграмме Excel подвести мышь к точке, то высвечиваются координаты этой точки. Диаграмме можно назначить макрос. А как в этом макросе программно получить эту точку? Хотя бы ее номер...", но ответов так и не нашел. Имеется в виду получить номер точки по щелчку по ней мыши, так я понимаю...Мне это видимо и надо. Но именно в этом у меня и есть камень преткновения. Хотелось бы узнать, как выглядит команда, по которой переменной в макросе присваивается номер точки, по которой кликнула мышь. Помогите

[pashulka]

Private Sub Chart_Select(ByVal ElementID As Long, ByVal Arg1 As Long, ByVal Arg2 As Long)
    If ElementID = xlSeries Then
       If Arg2 = -1 Then
          MsgBox "Выделены все точки"
       Else
          MsgBox "Ряд " & Arg1 & " Точка " & Arg2
       End If
    End If
End Sub

Перед использованием ознакомиться с :

Using Events with Embedded Charts

Select Event

[zot315]

Ок! Спасибо! буду пробовать

[zot315]

С предыдущими вопросами справился, все работает как хотелось, но заткнулся в одном месте видимо на элементарном незнании (ответ искал - не нашел или плохо искал), короче: надо выделить строку по ее номеру, только ее номер N (integer) - в цикле (на разных листах) разный, поэтому как вместо, например Range("1:1").Select написать что то типа Range(N:N).Select? Но этот вариант не проходит, а как правильно?

[IgorGO]

rows(R).select
или
range(R & ":" & R).select

[zot315]

Спасибо! Знание нюансов синтаксиса - великая вещь! Одноко теперь уже вопрос чисто из любопытства - range(R & ":" & R).select работает (и на этом можно успокоится), но не работает rows(R).select, выдает сообщение Run-time error '1004': Method 'Rows' Of Object '_Global' Failed. Почему?

[IgorGO]

не знаю чему у Вас равно R (видимо 0) на момент выполнения строки Rows(R).select

напишите так:
Rows(5).select
или
R = 6: Rows(R).select

[Aleksandr H.]

Сообщение от zot315

Спасибо! Знание нюансов синтаксиса - великая вещь! Одноко теперь уже вопрос чисто из любопытства - range(R & ":" & R).select работает (и на этом можно успокоится), но не работает rows(R).select, выдает сообщение Run-time error '1004': Method 'Rows' Of Object '_Global' Failed. Почему?

Может, о5 же, R = 0?
https://youtu.be/eEnr1GNrJX8