ChartSheet.SeriesChange イベント (2007 System)
更新 : 2007 年 11 月
Microsoft.Office.Tools.Excel.ChartSheet のデータ要素の値が変更されたときに発生します。
名前空間 : 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 ChartSheet
Dim handler As ChartEvents_SeriesChangeEventHandler
AddHandler instance.SeriesChange, handler
public event ChartEvents_SeriesChangeEventHandler SeriesChange
例
次のコード例に示す SeriesChange イベントのハンドラは、現在の Microsoft.Office.Tools.Excel.ChartSheet のデータ要素が変更されたときに、要素の輪郭の色を緑に設定します。
Private Sub ChangePointColorWhenSeriesChange()
Globals.Sheet1.Range("A1", "A5").Value2 = 22
Globals.Sheet1.Range("B1", "B5").Value2 = 55
Me.SetSourceData(Globals.Sheet1.Range("A1", "B5"), _
Excel.XlRowCol.xlColumns)
Me.ChartType = Excel.XlChartType.xl3DColumn
End Sub
Sub ChartSheet1_SeriesChange(ByVal SeriesIndex As Integer, _
ByVal PointIndex As Integer) Handles Me.SeriesChange
Dim series1 As Excel.Series = _
CType(Me.SeriesCollection(SeriesIndex), Excel.Series)
Dim point1 As Excel.Point = _
CType(series1.Points(PointIndex), Excel.Point)
point1.Border.Color = _
ColorTranslator.ToOle(Color.Green)
End Sub
private void ChangePointColorWhenSeriesChange()
{
Globals.Sheet1.Range["A1", "A5"].Value2 = 22;
Globals.Sheet1.Range["B1", "B5"].Value2 = 55;
this.SetSourceData(Globals.Sheet1.Range["A1", "B5"],
Excel.XlRowCol.xlColumns);
this.ChartType = Excel.XlChartType.xl3DColumn;
this.SeriesChange +=
new Excel.ChartEvents_SeriesChangeEventHandler(
ChartSheet1_SeriesChange);
}
void ChartSheet1_SeriesChange(int SeriesIndex, int PointIndex)
{
Excel.Series series1 =
(Excel.Series)this.SeriesCollection(SeriesIndex);
Excel.Point point1 = (Excel.Point)series1.Points(PointIndex);
point1.Border.Color =
ColorTranslator.ToOle(Color.Green);
}
アクセス許可
- 直前の呼び出し元に対する完全な信頼。このメンバは、部分的に信頼されているコードから使用することはできません。詳細については、「部分信頼コードからのライブラリの使用」を参照してください。