Excel VBA質問箱 IV

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

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


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

14310 / 76734

←次へ　｜　前へ→


	【67921】Re:埋め込みグラフにおいて選択したpointのindexの取得方法

ｍｏｍｏ - 11/1/17(月) 11:16 -


	引用なし

	パスワード

▼ichinose さん：
なるほど、イベントでElementIDがxlSeriesの場合に
Arg1がSeriesのIndexで
Arg2がPointsのIndexが拾えるのですね。

ボタンか何かでイベント開始すれば簡単に使えそうですね。
私も勉強させて頂きました。ありがとうございます。

Private WithEvents cht As Chart

Private Sub CommandButton1_Click()
Set cht = Me.ChartObjects(1).Chart
End Sub

Private Sub cht_BeforeDoubleClick(ByVal ElementID As Long, ByVal Arg1 As Long, ByVal Arg2 As Long, Cancel As Boolean)
If ElementID = xlSeries Then
　If Arg2 > 0 Then
　　MsgBox "SeriesIndex= " & Arg1 & vbLf & "PointIndex= " & Arg2
　End If
　Cancel = True
　Set cht = Nothing
End If
End Sub

5 hits

▼

【67876】埋め込みグラフにおいて選択したpointのindexの取得方法 ゆたか 11/1/14(金) 15:42