チャートに誤差範囲を表示する

シリーズのSetErrorBarsVisibleメソッドを呼び出すことでチャートに誤差範囲（エラーバー）を表示できます。誤差範囲の種類（固定値、パーセンテージ、標準偏差など）や表示方向（上下・左右）も設定可能です。

【実行例】

C#
Visual Basic

 private void Form1_Load(object sender, EventArgs e)
 {
  // データを設定します
  fpSpread1.AsWorkbook().ActiveSheet.Cells[0, 1].Value = "S1";
  fpSpread1.AsWorkbook().ActiveSheet.Cells[0, 2].Value = "S2";
  fpSpread1.AsWorkbook().ActiveSheet.Cells[0, 3].Value = "S3";

  fpSpread1.AsWorkbook().ActiveSheet.Cells[1, 0].Value = "1Q";
  fpSpread1.AsWorkbook().ActiveSheet.Cells[2, 0].Value = "2Q";
  fpSpread1.AsWorkbook().ActiveSheet.Cells[3, 0].Value = "3Q";
  fpSpread1.AsWorkbook().ActiveSheet.Cells[4, 0].Value = "4Q";

  fpSpread1.AsWorkbook().ActiveSheet.Cells[1, 1].Value = 50;
  fpSpread1.AsWorkbook().ActiveSheet.Cells[2, 1].Value = 30;
  fpSpread1.AsWorkbook().ActiveSheet.Cells[3, 1].Value = 20;
  fpSpread1.AsWorkbook().ActiveSheet.Cells[4, 1].Value = 40;

  fpSpread1.AsWorkbook().ActiveSheet.Cells[1, 2].Value = 30;
  fpSpread1.AsWorkbook().ActiveSheet.Cells[2, 2].Value = 15;
  fpSpread1.AsWorkbook().ActiveSheet.Cells[3, 2].Value = 50;
  fpSpread1.AsWorkbook().ActiveSheet.Cells[4, 2].Value = 20;

  fpSpread1.AsWorkbook().ActiveSheet.Cells[1, 3].Value = 10;
  fpSpread1.AsWorkbook().ActiveSheet.Cells[2, 3].Value = 40;
  fpSpread1.AsWorkbook().ActiveSheet.Cells[3, 3].Value = 25;
  fpSpread1.AsWorkbook().ActiveSheet.Cells[4, 3].Value = 25;

  // データ領域およびスタイルを指定してチャートを設定
  FarPoint.Win.Spread.Model.CellRange range = new FarPoint.Win.Spread.Model.CellRange(0, 0, 5, 4);
  fpSpread1.Sheets[0].AddChart(range, typeof(FarPoint.Win.Chart.LineSeries), 250, 200, 250, 30, FarPoint.Win.Chart.ChartViewType.View2D, true);

  // 誤差範囲（エラーバー）を表示
  ((FarPoint.Win.Chart.LineSeries)fpSpread1.Sheets[0].Charts[0].Model.PlotAreas[0].Series[0]).SetErrorBarsVisible(true);
  ((FarPoint.Win.Chart.LineSeries)fpSpread1.Sheets[0].Charts[0].Model.PlotAreas[0].Series[1]).SetErrorBarsVisible(true);
  ((FarPoint.Win.Chart.LineSeries)fpSpread1.Sheets[0].Charts[0].Model.PlotAreas[0].Series[2]).SetErrorBarsVisible(true);
 }

 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  ' データを設定します
  FpSpread1.AsWorkbook().ActiveSheet.Cells(0, 1).Value = "S1"
  FpSpread1.AsWorkbook().ActiveSheet.Cells(0, 2).Value = "S2"
  FpSpread1.AsWorkbook().ActiveSheet.Cells(0, 3).Value = "S3"

  FpSpread1.AsWorkbook().ActiveSheet.Cells(1, 0).Value = "1Q"
  FpSpread1.AsWorkbook().ActiveSheet.Cells(2, 0).Value = "2Q"
  FpSpread1.AsWorkbook().ActiveSheet.Cells(3, 0).Value = "3Q"
  FpSpread1.AsWorkbook().ActiveSheet.Cells(4, 0).Value = "4Q"

  FpSpread1.AsWorkbook().ActiveSheet.Cells(1, 1).Value = 50
  FpSpread1.AsWorkbook().ActiveSheet.Cells(2, 1).Value = 30
  FpSpread1.AsWorkbook().ActiveSheet.Cells(3, 1).Value = 20
  FpSpread1.AsWorkbook().ActiveSheet.Cells(4, 1).Value = 40

  FpSpread1.AsWorkbook().ActiveSheet.Cells(1, 2).Value = 30
  FpSpread1.AsWorkbook().ActiveSheet.Cells(2, 2).Value = 15
  FpSpread1.AsWorkbook().ActiveSheet.Cells(3, 2).Value = 50
  FpSpread1.AsWorkbook().ActiveSheet.Cells(4, 2).Value = 20

  FpSpread1.AsWorkbook().ActiveSheet.Cells(1, 3).Value = 10
  FpSpread1.AsWorkbook().ActiveSheet.Cells(2, 3).Value = 40
  FpSpread1.AsWorkbook().ActiveSheet.Cells(3, 3).Value = 25
  FpSpread1.AsWorkbook().ActiveSheet.Cells(4, 3).Value = 25

  ' データ領域およびスタイルを指定してチャートを設定
  Dim Range As New FarPoint.Win.Spread.Model.CellRange(0, 0, 5, 4)
  FpSpread1.Sheets(0).AddChart(Range, GetType(FarPoint.Win.Chart.LineSeries), 250, 200, 250, 30, FarPoint.Win.Chart.ChartViewType.View2D, True)

  ' 誤差範囲（エラーバー）を表示
  CType(FpSpread1.Sheets(0).Charts(0).Model.PlotAreas(0).Series(0), FarPoint.Win.Chart.LineSeries).SetErrorBarsVisible(True)
  CType(FpSpread1.Sheets(0).Charts(0).Model.PlotAreas(0).Series(1), FarPoint.Win.Chart.LineSeries).SetErrorBarsVisible(True)
  CType(FpSpread1.Sheets(0).Charts(0).Model.PlotAreas(0).Series(2), FarPoint.Win.Chart.LineSeries).SetErrorBarsVisible(True)
 End Sub