create a excel worksheet in asp.net

This code shows how to create excel sheet in vb.net

Public Class Tyburn1

Private missing As Object = Type.Missing

Public Sub New()

Dim oXL As New Excel.Application()

oXL.Visible = False

Dim oWB As Excel.Workbook = oXL.Workbooks.Add(missing)

Dim oSheet As Excel.Worksheet = TryCast(oWB.ActiveSheet, Excel.Worksheet)

oSheet.Name = "The first sheet"

oSheet.Cells(1, 1) = "Something"

Dim oSheet2 As Excel.Worksheet = TryCast(oWB.Sheets.Add(missing, missing, 1, missing), Excel.Worksheet)

oSheet2.Name = "The second sheet"

oSheet2.Cells(1, 1) = "Something completely different"

Dim fileName As String = Path.GetDirectoryName(Assembly.GetExecutingAssembly().Location) & "\SoSample.xlsx"

oWB.SaveAs(fileName, Excel.XlFileFormat.xlOpenXMLWorkbook, missing, missing, missing, missing, _

Excel.XlSaveAsAccessMode.xlNoChange, missing, missing, missing, missing, missing)

oWB.Close(missing, missing, missing)

oXL.UserControl = True

oXL.Quit()

End Sub

End Class

Dim oSheet2 As Excel.Worksheet = TryCast(oWB.Sheets.Add(missing, missing, 1, missing), Excel.Worksheet)

1 Reply

Know the answer? Post it — somebody with the same question will find it here.