| |
▼［名前なし］ さん：
>シート内の円グラフクリック時、マクロを使ってクリックした系列を取得しようとしています。
>
>GetChartElementで系列を取得しようとし、
>GetCursorPosでマウス位置を取得しましたが、判定位置にズレがありました。
>
これとは違うのですか？
ht tp://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=80696;id=excel
別の方法でもよければ、こんな感じでできませんか。
Private Sub myChart_MouseUp(ByVal Button As Long, ByVal Shift As Long, ByVal x As Long, ByVal y As Long)
Dim ElementID As Long
Dim Arg1 As Long
Dim Arg2 As Long
myChart.GetChartElement x, y, ElementID, Arg1, Arg2
If ElementID = xlSeries Then
MsgBox myChart.SeriesCollection(Arg1).Name
End If
End Sub
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
