Выполнить действие при нажатии на ячейку

[andi_ua]

здраствуйте.есть таблица типа

             0 | 1 | 2 | 3 | и.т.д.
пример1     30 | 2 | 4 | 1 | ...
пример2     30 | 1 | 3 | 2 | ...
пример3     30 | 4 | 2 | 1 | ...

при нажатии на пример1 должно рисовать график  "примера1 от 0|1|2|3 и.т.д."
тоже самое при нажатие на другие "пример2,3"

 

[Sla]

здравствуйте,
без нажатия графики строятся?

[andi_ua]

да

[Sla]

тады смотреть в сторону
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)

[andi_ua]

куда ето добавить надо? обяснишь?

[andi_ua]

просто рисует график по "пример2" нужно чтоб ето рисовало по любому примеру при нажатие на него.

Range("A3:G3").Select
    Charts.Add
    ActiveChart.ChartType = xlLineMarkers
    ActiveChart.SetSourceData Source:=Sheets("Лист3").Range("A3:G3"), PlotBy:= _
        xlRows
    ActiveChart.Location Where:=xlLocationAsObject, Name:="Лист3"
    With ActiveChart
        .HasTitle = True
        .ChartTitle.Characters.Text = "пример2"
        .Axes(xlCategory, xlPrimary).HasTitle = False
        .Axes(xlValue, xlPrimary).HasTitle = False
    End With
End Sub

[Sla]

куда ето добавить надо? обяснишь?

как куда? в модуль, а в самой процедуре анализировать какая ячейка кликнута