OnLegendClick(Row, Col, RowData)

Occurs whenever users click one of the Legend rows. The Row and Col parameters indicate, respectively, the row and column clicked. The RowData parameter is the Legend's Pen index where the click occurred. Example:

Sub E3Chart1_OnLegendClick(Row, Col, RowData)
  Set text = Screen.Item("Text1")
  text.Value = Legend.Item(col).Name & " " & _
    Pens.Item(RowData).Name
End Sub