PowerTools ActiveReports for .NET 9.0J
AddHorizontalPageBreak メソッド
使用例 

ページ区切りを追加する行(1から始まります)。
ページ区切りを開始する列(1から始まります)。
ページ区切りを終了する列(1から始まります)。
水平方向(行)のページ区切りを追加します。
構文
'宣言
 
Public Sub AddHorizontalPageBreak( _
   ByVal row As UShort, _
   ByVal columnstart As UShort, _
   ByVal columnend As UShort _
) 
public void AddHorizontalPageBreak( 
   ushort row,
   ushort columnstart,
   ushort columnend
)

パラメータ

row
ページ区切りを追加する行(1から始まります)。
columnstart
ページ区切りを開始する列(1から始まります)。
columnend
ページ区切りを終了する列(1から始まります)。
解説

ページ区切りはオーバーラップできません。ページ区切りは、指定した行または列の後ろに追加されます。たとえば、rowに3を指定した場合、ページ区切りは 3行目と4行目の間になります。

使用例
private void btnSpread_Click(object sender, System.EventArgs e)
{
    //ワークブックの次元を設定し、そのワークブックのSheetsコレクションにシートを追加する
    GrapeCity.SpreadBuilder.Workbook sb = new GrapeCity.SpreadBuilder.Workbook();
    sb.Sheets.AddNew();
    //列、行、およびセルのプロパティと値を、必要に応じて設定する
    sb.Sheets[0].Name = "Customer Call List";
    sb.Sheets[0].Columns(0).Width = 2 * 1440;
    sb.Sheets[0].Columns(1).Width = 1440;
    sb.Sheets[0].Columns(2).Width = 1440;
    sb.Sheets[0].Rows(0).Height = 1440/4;
    //ヘッダー行
    sb.Sheets[0].Cell(0,0).SetValue("Company Name");
    sb.Sheets[0].Cell(0,0).FontBold = true;
    sb.Sheets[0].Cell(0,1).SetValue("Contact Name");
    sb.Sheets[0].Cell(0,1).FontBold = true;
    sb.Sheets[0].Cell(0,2).SetValue("Phone");
    sb.Sheets[0].Cell(0,2).FontBold = true;
    //データの最初の行
    sb.Sheets[0].Cell(1,0).SetValue("GrapeCity");
    sb.Sheets[0].Cell(1,1).SetValue("Mortimer");
    sb.Sheets[0].Cell(1,2).SetValue("(614) 895-3142");

    //ワークブックをExcelファイルに保存する
    sb.Save (Application.StartupPath + @"\x.xls");

    MessageBox.Show("Your Spreadsheet, " + sb.Sheets[0].Columns(0).OwnerSheet.Name + ", has been saved to " + Application.StartupPath + "\\x.xls");
}
Private Sub btnSpread_Click(sender As Object, e As System.EventArgs)
	'ワークブックの次元を設定し、そのワークブックのSheetsコレクションにシートを追加する
	Dim sb As New GrapeCity.SpreadBuilder.Workbook()
	sb.Sheets.AddNew()
	'列、行、およびセルのプロパティと値を、必要に応じて設定する
	sb.Sheets(0).Name = "Customer Call List"
	sb.Sheets(0).Columns(0).Width = 2 * 1440
	sb.Sheets(0).Columns(1).Width = 1440
	sb.Sheets(0).Columns(2).Width = 1440
	sb.Sheets(0).Rows(0).Height = 1440 / 4
	'ヘッダー行
	sb.Sheets(0).Cell(0, 0).SetValue("Company Name")
	sb.Sheets(0).Cell(0, 0).FontBold = True
	sb.Sheets(0).Cell(0, 1).SetValue("Contact Name")
	sb.Sheets(0).Cell(0, 1).FontBold = True
	sb.Sheets(0).Cell(0, 2).SetValue("Phone")
	sb.Sheets(0).Cell(0, 2).FontBold = True
	'データの最初の行
	sb.Sheets(0).Cell(1, 0).SetValue("GrapeCity")
	sb.Sheets(0).Cell(1, 1).SetValue("Mortimer")
	sb.Sheets(0).Cell(1, 2).SetValue("(614) 895-3142")

	'ワークブックをExcelファイルに保存する
	sb.Save(Application.StartupPath + "\x.xls")

	MessageBox.Show("Your Spreadsheet, " + sb.Sheets(0).Columns(0).OwnerSheet.Name + ", has been saved to " + Application.StartupPath + "\x.xls")
End Sub
参照

関連項目

DDSheet クラス
DDSheet メンバ

 

 


©2003-2015 GrapeCity inc. All rights reserved.