PrintSheetメソッド呼び出しによる印刷時に任意の行（列）で改ページすることはできますか？ – MESCIUS ナレッジベース

作成日: 2024/02/21 最終更新日: 2024/02/21

文書種別

使用方法

詳細

SheetViewクラスより提供されているSetRowPageBreakメソッド呼び出しを実装することにより、指定した行の前に改ページを強制挿入するかどうかを設定することができます。また、列での改ページを行う場合はSetColumnPageBreakメソッドを呼び出します。

◎サンプルコード（行の改ページ）

　　Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
　　　　FpSpread1.ActiveSheet.RowCount = 20
　　　　FpSpread1.ActiveSheet.ColumnCount = 3
　　　　Dim i As Integer
　　　　Dim j As Integer
　　　　For i = 0 To FpSpread1.ActiveSheet.RowCount - 1
　　　　　　For j = 0 To FpSpread1.ActiveSheet.ColumnCount - 1
　　　　　　　　FpSpread1.ActiveSheet.SetValue(i, j, i + j)
　　　　　　Next
　　　　Next
　　End Sub

　　Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
　　　　'5行単位での改ページ
　　　　FpSpread1.ActiveSheet.SetRowPageBreak(5, True)
　　　　FpSpread1.ActiveSheet.SetRowPageBreak(10, True)
　　　　FpSpread1.ActiveSheet.SetRowPageBreak(15, True)
　　　　Dim pi As New FarPoint.Win.Spread.PrintInfo
　　　　pi.Preview = True
　　　　FpSpread1.ActiveSheet.PrintInfo = pi
　　　　FpSpread1.PrintSheet(FpSpread1.ActiveSheetIndex)
　　End Sub

◎同（C#）

　　private void Form1_Load(object sender, System.EventArgs e)
　　{
　　　　fpSpread1.ActiveSheet.RowCount = 20;
　　　　fpSpread1.ActiveSheet.ColumnCount = 3;
　　　　for (int i = 0; i <= fpSpread1.ActiveSheet.RowCount - 1; i++)
　　　　　　for (int j = 0; j <= fpSpread1.ActiveSheet.ColumnCount - 1; j++)
　　　　　　　　fpSpread1.ActiveSheet.SetValue(i, j, i + j);
　　}

　　private void button1_Click(object sender, System.EventArgs e)
　　{
　　　　//5行単位での改ページ
　　　　fpSpread1.ActiveSheet.SetRowPageBreak(5, true);
　　　　fpSpread1.ActiveSheet.SetRowPageBreak(10, true);
　　　　fpSpread1.ActiveSheet.SetRowPageBreak(15, true);
　　　　FarPoint.Win.Spread.PrintInfo pi = new FarPoint.Win.Spread.PrintInfo();
　　　　pi.Preview = true;
　　　　fpSpread1.ActiveSheet.PrintInfo = pi;
　　　　fpSpread1.PrintSheet(fpSpread1.ActiveSheetIndex);
　　}

◎サンプルコード（列の改ページ）

　　Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
　　　　FpSpread1.ActiveSheet.RowCount = 3
　　　　FpSpread1.ActiveSheet.ColumnCount = 20
　　　　Dim i As Integer
　　　　Dim j As Integer
　　　　For i = 0 To FpSpread1.ActiveSheet.RowCount - 1
　　　　　　For j = 0 To FpSpread1.ActiveSheet.ColumnCount - 1
　　　　　　　　FpSpread1.ActiveSheet.SetValue(i, j, i + j)
　　　　　　Next
　　　　Next
　　End Sub

　　Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
　　　　'5列単位での改ページ
　　　　FpSpread1.ActiveSheet.SetColumnPageBreak(5, True)
　　　　FpSpread1.ActiveSheet.SetColumnPageBreak(10, True)
　　　　FpSpread1.ActiveSheet.SetColumnPageBreak(15, True)
　　　　Dim pi As New FarPoint.Win.Spread.PrintInfo
　　　　pi.Preview = True
　　　　FpSpread1.ActiveSheet.PrintInfo = pi
　　　　FpSpread1.PrintSheet(FpSpread1.ActiveSheetIndex)
　　End Sub

◎同（C#）

　　private void Form1_Load(object sender, System.EventArgs e)
　　{
　　　　fpSpread1.ActiveSheet.RowCount = 3;
　　　　fpSpread1.ActiveSheet.ColumnCount = 20;
　　　　for (int i = 0; i <= fpSpread1.ActiveSheet.RowCount - 1; i++)
　　　　　　for (int j = 0; j <= fpSpread1.ActiveSheet.ColumnCount - 1; j++)
　　　　　　　　fpSpread1.ActiveSheet.SetValue(i, j, i + j);
　　}

　　private void button1_Click(object sender, System.EventArgs e)
　　{
　　　　//5列単位での改ページ
　　　　fpSpread1.ActiveSheet.SetColumnPageBreak(5, true);
　　　　fpSpread1.ActiveSheet.SetColumnPageBreak(10, true);
　　　　fpSpread1.ActiveSheet.SetColumnPageBreak(15, true);
　　　　FarPoint.Win.Spread.PrintInfo pi = new FarPoint.Win.Spread.PrintInfo();
　　　　pi.Preview = true;
　　　　fpSpread1.ActiveSheet.PrintInfo = pi;
　　　　fpSpread1.PrintSheet(fpSpread1.ActiveSheetIndex);
　　}