次の方法で共有


Chart.SeriesChange イベント (2007 System)

更新 : 2007 年 11 月

Chart コントロールのデータ要素の値が変更されたときに発生します。

名前空間 :  Microsoft.Office.Tools.Excel
アセンブリ :  Microsoft.Office.Tools.Excel.v9.0 (Microsoft.Office.Tools.Excel.v9.0.dll 内)

構文

'宣言
Public Event SeriesChange As ChartEvents_SeriesChangeEventHandler
'使用
Dim instance As Chart
Dim handler As ChartEvents_SeriesChangeEventHandler

AddHandler instance.SeriesChange, handler
public event ChartEvents_SeriesChangeEventHandler SeriesChange

次のコード例は、SeriesChange イベントのハンドラを持つ Chart を作成します。このイベント ハンドラは、グラフのデータ要素が変更されたときに、要素の輪郭の色を緑に設定します。

WithEvents SeriesChart As Microsoft.Office.Tools.Excel.Chart

Private Sub ChangePointColorWhenSeriesChange()
    Me.Range("A1", "A5").Value2 = 22
    Me.Range("B1", "B5").Value2 = 55

    SeriesChart = Me.Controls.AddChart(Me.Range("D2", "H12"), _
        "SeriesChart")
    SeriesChart.SetSourceData(Me.Range("A1", "B5"), _
        Excel.XlRowCol.xlColumns)
    SeriesChart.ChartType = Excel.XlChartType.xl3DColumn
End Sub

Sub SeriesChart_SeriesChange(ByVal SeriesIndex As Integer, _
    ByVal PointIndex As Integer) Handles SeriesChart.SeriesChange

    Dim series1 As Excel.Series = _
         CType(SeriesChart.SeriesCollection(SeriesIndex), _
         Excel.Series)
    Dim point1 As Excel.Point = _
        CType(series1.Points(PointIndex), Excel.Point)

    point1.Border.Color = _
            ColorTranslator.ToOle(Color.Green)
End Sub
Microsoft.Office.Tools.Excel.Chart seriesChart;

private void ChangePointColorWhenSeriesChange()
{
    this.Range["A1", "A5"].Value2 = 22;
    this.Range["B1", "B5"].Value2 = 55;

    seriesChart = this.Controls.AddChart(this.Range["D2", "H12"],
        "seriesChart");
    seriesChart.SetSourceData(this.Range["A1", "B5"],
        Excel.XlRowCol.xlColumns);
    seriesChart.ChartType = Excel.XlChartType.xl3DColumn;

    seriesChart.SeriesChange +=
        new Excel.ChartEvents_SeriesChangeEventHandler(
        seriesChart_SeriesChange);
}

void seriesChart_SeriesChange(int SeriesIndex, int PointIndex)
{
    Excel.Series series1 =
        (Excel.Series)seriesChart.SeriesCollection(SeriesIndex);
    Excel.Point point1 = (Excel.Point)series1.Points(PointIndex);

    point1.Border.Color =
        ColorTranslator.ToOle(Color.Green);
}

アクセス許可

  • 直前の呼び出し元に対する完全な信頼。このメンバは、部分的に信頼されているコードから使用することはできません。詳細については、「部分信頼コードからのライブラリの使用」を参照してください。

参照

参照

Chart クラス

Chart メンバ

Microsoft.Office.Tools.Excel 名前空間