Excel Jetcell .NET component - C# / VB.NET Examples & Samples Code

Module Module1

Sub Main()
        'Create a new workbook.
        Dim Wbook = New ExcelWorkbook()

'Add new worksheet to workbook.
        Wbook.Worksheets.Add("Sheet1")

Wbook.Worksheets(0).Cells(0, 0).Value = "Sample"
        Wbook.Worksheets(0).Cells(0, 10).Value = "Sample"
        Wbook.Worksheets(0).Cells(0, 20).Value = "Sample"

Wbook.Worksheets(0).Header.IsDifferentOddEven = True
        Wbook.Worksheets(0).Header.IsDifferentFirst = True

Wbook.Worksheets(0).Header.FirstPageString = "&L&F - &A&R&D&T"
        Wbook.Worksheets(0).Header.DefaultString = "&L&A"
        Wbook.Worksheets(0).Header.EvenPageString = "&R&A"
        Wbook.Worksheets(0).Footer.FirstPageString = "&C&P/&N"
        Wbook.Worksheets(0).Footer.DefaultString = "&L&P/&N"
        Wbook.Worksheets(0).Footer.EvenPageString = "&R&P/&N"

'XLS
        Wbook.WriteXLS("..\..\..\ExcelHeaderFooter.xls")

'XLSX
        Wbook.WriteXLSX("..\..\..\ExcelHeaderFooter.xlsx")

'Open specified file in MS Excel.
        System.Diagnostics.Process.Start("..\..\..\ExcelHeaderFooter.xlsx")

End Sub

End Module