private void Form1_Load(object sender, EventArgs e) { fpSpread1.Sheets[0].RowCount = 10; fpSpread1.Sheets[0].ColumnCount = 15; // Show the column footer. fpSpread1.Sheets[0].ColumnFooter.Visible = true; fpSpread1.Sheets[0].ColumnFooter.RowCount = 2; fpSpread1.Sheets[0].ColumnFooter.DefaultStyle.ForeColor = Color.Purple; fpSpread1.Sheets[0].ColumnFooter.Columns[12].HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Left; fpSpread1.Sheets[0].ColumnFooter.Cells[0, 12].RowSpan = 2; fpSpread1.Sheets[0].ColumnFooter.Cells[0, 0].Value = "test"; } private void button1_Click(object sender, EventArgs e) { // Define the printer settings FarPoint.Win.Spread.PrintInfo printset = new FarPoint.Win.Spread.PrintInfo(); printset.Header = "Print Job For /nFPT Inc."; printset.Footer = "This is Page /p/nof /pc Pages"; printset.ShowColumnFooter = FarPoint.Win.Spread.PrintHeader.Show; printset.ShowColumnFooterEachPage = true; // Assign the printer settings to the sheet and print to PDF printset.PrintToPdf = true; printset.PdfFileName = "C:\\results.pdf"; fpSpread1.Sheets[0].PrintInfo = printset; fpSpread1.PrintSheet(0); }
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click ' Define the printer settings Dim printset As New FarPoint.Win.Spread.PrintInfo() printset.Header = "Print Job For /nFPT Inc." printset.Footer = "This is Page /p/nof /pc Pages" printset.ShowColumnFooter = FarPoint.Win.Spread.PrintHeader.Show printset.ShowColumnFooterEachPage = True ' Assign the printer settings to the sheet and print to PDF printset.PrintToPdf = True printset.PdfFileName = "C:\results.pdf" fpSpread1.Sheets(0).PrintInfo = printset fpSpread1.PrintSheet(0) End Sub Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load fpSpread1.Sheets(0).RowCount = 10 fpSpread1.Sheets(0).ColumnCount = 15 ' Show the footer. fpSpread1.Sheets(0).ColumnFooter.Visible = True fpSpread1.Sheets(0).ColumnFooter.RowCount = 2 fpSpread1.Sheets(0).ColumnFooter.DefaultStyle.ForeColor = Color.Purple fpSpread1.Sheets(0).ColumnFooter.Columns(12).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Left fpSpread1.Sheets(0).ColumnFooter.Cells(0, 12).RowSpan = 2 fpSpread1.Sheets(0).ColumnFooter.Cells(0, 0).Value = "test" End Sub