じょうごチャートを追加する

FunnelSeriesクラスを使用してじょうごチャートを作成できます。

【実行例】

チャート

C#
Visual Basic

 private void Form1_Load(object sender, System.EventArgs e)
 {
    // シートにデータを設定
    fpSpread1.ActiveSheet.SetClip(0, 0, 1, 2, "Web閲覧\t100");
    fpSpread1.ActiveSheet.SetClip(1, 0, 1, 2, "リンクを起動\t60");
    fpSpread1.ActiveSheet.SetClip(2, 0, 1, 2, "ユーザー登録\t35");
    // セル範囲を設定してじょうごチャートを作成します
    fpSpread1.ActiveSheet.AddChart(new FarPoint.Win.Spread.Model.CellRange(0, 0, 3, 2), typeof(FarPoint.Win.Chart.FunnelSeries), 250, 200, 200, 30);
    FarPoint.Win.Chart.ChartModel model = fpSpread1.ActiveSheet.Charts[0].Model;
    // 凡例を表示しない
    model.LegendAreas.Clear();
    // フォントを設定
    model.PlotAreas[0].Series[0].LabelTextFont = new Font("メイリオ", 9);
    ((FarPoint.Win.Chart.YPlotArea)model.PlotAreas[0]).XAxis.LabelTextFont = new Font("メイリオ", 9);
 }

 Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
    ' シートにデータを設定
    FpSpread1.ActiveSheet.SetClip(0, 0, 1, 2, "Web閲覧" + Chr(9) + "100")
    FpSpread1.ActiveSheet.SetClip(1, 0, 1, 2, "リンクを起動" + Chr(9) + "60")
    FpSpread1.ActiveSheet.SetClip(2, 0, 1, 2, "ユーザー登録" + Chr(9) + "35")
    ' セル範囲を設定してじょうごチャートを作成します
    FpSpread1.ActiveSheet.AddChart(New FarPoint.Win.Spread.Model.CellRange(0, 0, 3, 2), GetType(FarPoint.Win.Chart.FunnelSeries), 250, 200, 200, 30)
    Dim model As FarPoint.Win.Chart.ChartModel = FpSpread1.ActiveSheet.Charts(0).Model
    ' 凡例を表示しない
    model.LegendAreas.Clear()
    ' フォントを設定
    model.PlotAreas(0).Series(0).LabelTextFont = New Font("メイリオ", 9)
    CType(model.PlotAreas(0), FarPoint.Win.Chart.YPlotArea).XAxis.LabelTextFont = New Font("メイリオ", 9)
 End Sub