Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

1677 / 76734

←次へ　｜　前へ→


	【80705】Re:行番号列の列幅取得方法

マナ - 19/4/17(水) 18:27 -


	引用なし

	パスワード

▼［名前なし］さん：

>シート内の円グラフクリック時、マクロを使ってクリックした系列を取得しようとしています。
>
>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

3 hits

▼

【80703】行番号列の列幅取得方法 ［名前なし］ 19/4/17(水) 12:34