//create a new workbook var workbook = new GrapeCity.Documents.Excel.Workbook(); IWorksheet sheet = workbook.Worksheets[0]; int row = 50; int column = 14; object[,] data = new object[row, column]; for (int i = 0; i < row; i++) { for (int j = 0; j < column; j++) { data[i, j] = "R" + i + "C" + j; } } //Set data. sheet.Range["A1:N50"].Value = data; sheet.Range["A2:N4"].Value = "TitleRows"; sheet.Range["A2:N4"].Interior.Color = Color.Green; sheet.Range["C1:E50"].Value = "TitleColumns"; sheet.Range["C1:E50"].Interior.Color = Color.Yellow; sheet.PageSetup.PrintHeadings = true; //Set print titles. sheet.PageSetup.PrintTitleRows = "$2:$4"; sheet.PageSetup.PrintTitleColumns = "$C:$E"; // Save to a pdf file workbook.Save("ConfigurePrintTitles.pdf");
' Create a new Workbook Dim workbook As New Workbook Dim sheet As IWorksheet = workbook.Worksheets(0) Dim row As Integer = 50 Dim column As Integer = 14 Dim data(row - 1, column - 1) As Object For i As Integer = 0 To row - 1 For j As Integer = 0 To column - 1 data(i, j) = "R" & i & "C" & j Next j Next i 'Set data. sheet.Range("A1:N50").Value = data sheet.Range("A2:N4").Value = "TitleRows" sheet.Range("A2:N4").Interior.Color = Color.Green sheet.Range("C1:E50").Value = "TitleColumns" sheet.Range("C1:E50").Interior.Color = Color.Yellow sheet.PageSetup.PrintHeadings = True 'Set print titles. sheet.PageSetup.PrintTitleRows = "$2:$4" sheet.PageSetup.PrintTitleColumns = "$C:$E" ' save to a pdf file workbook.Save("ConfigurePrintTitles.pdf")