Chart.GetChartElement メソッド (Project)

指定された x 座標および y 座標のグラフ要素についての情報を返します。 このメソッドは、リリースされたバージョンの Project 2013 では削除されます。

構文

式。GetChartElement (x, y, ElementID, Arg1, Arg2)

式 は Chart オブジェクトを表す変数です。

パラメーター

戻り値

GetChartElement メソッドは何も返しません。 戻り値は、 ElementID、 Arg1、 Arg2 パラメーターに含まれます。

注釈

GetChartElement メソッドは、最初の 2 つの引数に対してのみ値を指定するため、異常です。 Project はその他の引数でデータを返すため、メソッドが返されたときにこれらの値を調べます。

メソッドが戻った後の ElementID の値によって、 Arg1 と Arg2 に何らかの情報が含まれるかどうかが決まります (表 1 参照)。

表 1. 要素 ID に基づく arg1 および arg2 の情報

表 2 は、メソッドが戻った後の Arg1 と Arg2 の意味を示しています。 [ 引数] 列の値は表 1 の値です。

表 2. Arg1 と Arg2 のデータの意味

例

次の例では、グラフ内のポイント (100, 100) のグラフ要素情報を取得します。 たとえば、ポイントがプロット エリア内にある場合、[即時] ウィンドウの出力は idNum: 19, a: 0, b: 0になります。 表 1 の情報によると、 xlPlotArea = 19 です。

Sub TestGetChartElements()
    Dim chartShape As Shape
    Dim reportName As String
    Dim x As Long
    Dim y As Long
    Dim idNum As Long
    Dim a As Long
    Dim b As Long
    
    reportName = "Simple scalar chart"
    Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
    
    ' Specify a point in the chart.
    x = 100
    y = 100
    
    chartShape.Chart.GetChartElement x, y, idNum, a, b
    
    Debug.Print "idNum: " & idNum & ", a: " & a & ", b: " & b
End Sub

関連項目

Chart オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。