I use EE plus. which was good option suggested by
Sergey Alexandrovich Kryukov
Thanks to SA once again.
Here is my code... This code doesn't take to selected rows to Excel. But it stores entire Gridview. You can just change the Dataset with selected Rows of Gridview. That works
Dim file As FileInfo = New FileInfo("ClaimForms.xls")
Using pck As New ExcelPackage(file)
Dim wsClaims As ExcelWorksheet = pck.Workbook.Worksheets.Add("Sheet1")
wsClaims.TabColor = Color.Blue
Dim wslineitems As ExcelWorksheet = pck.Workbook.Worksheets.Add("Sheet2")
wslineitems.TabColor = Color.Blue
Dim dsExcel As DataSet = dbnet.GetAllDetails()
Dim dtClaims As DataTable = dsExcel.Tables(0)
Dim dtLineItems As DataTable = dsExcel.Tables(1)
wsClaims.Cells("A1").LoadFromDataTable(dtClaims, True)
wslineitems.Cells("A1").LoadFromDataTable(dtLineItems, True)
wsClaims.Cells.AutoFitColumns()
wslineitems.Cells.AutoFitColumns()
Using rng As ExcelRange = wsClaims.Cells(1, 1, 1, dtClaims.Columns.Count)
rng.Style.Font.Bold = True
rng.Style.Fill.PatternType = ExcelFillStyle.Solid
rng.Style.Fill.BackgroundColor.SetColor(System.Drawing.Color.Blue)
rng.Style.Font.Color.SetColor(System.Drawing.Color.Yellow)
End Using
Using rng As ExcelRange = wslineitems.Cells(1, 1, 1, dtLineItems.Columns.Count)
rng.Style.Font.Bold = True
rng.Style.Fill.PatternType = ExcelFillStyle.Solid
rng.Style.Fill.BackgroundColor.SetColor(System.Drawing.Color.Blue)
rng.Style.Font.Color.SetColor(System.Drawing.Color.Yellow)
End Using
Dim result As MemoryStream = New MemoryStream
pck.SaveAs(result)
Response.ContentType = "application/vnd.openxmlformats-officedocument.spreadsheetml.sheet"
Dim fileName As String = String.Format("ClaimReport_{0:yyyyMMdd_HH_mm}.xlsx", DateTime.Now)
Dim disposition As String = String.Format("attachment; filename=""{0}""", fileName)
Response.AppendHeader("Content-Disposition", disposition)
result.WriteTo(Response.OutputStream)
Response.End()
Submit an article or tip