To download the trial version of EasyXLS Excel Library, press the below button:
If you already own a license key, you may login and download EasyXLS from your account.
Install the downloaded EasyXLS installer for v8.6 or earlier.
Step 2: License file setup
Step required for EasyXLS v9.0 or later.
If you are using a trial, generate a trial license file from EasyXLS trials page. The trial license is valid for 30-days.
If you own a license key, you may login to the account that purchased the license and generate the license file from: https://www.easyxls.com/my-orders
Setup the license file into your project using these guidelines.
Step 3: Create a VB.NET project
If don't have a project, create one as ASP.NET web application, windows forms app, console application, class library or service.
Step 4: Include EasyXLS library into project
EasyXLS.dll must be added as reference to your project. EasyXLS.dll can be found: - Inside the downloaded archive at Step 1 for EasyXLS v9.0 or later - Under installation path for EasyXLS v8.6 or earlier, in "Dot NET version" folder.
Step 5: Run VB.NET code that shows and formats chart datatable for Excel file
Execute the following VB.NET code that formats the chart data table for an Excel file.
'----------------------------------------------------------
' Tutorial 22
'
' This tutorial shows how to create an Excel file in VB.NET
' with a chart and show and format the chart data table.
'----------------------------------------------------------Imports System.Drawing
Imports EasyXLS
Imports EasyXLS.Charts
Imports EasyXLS.Constants
Imports EasyXLS.Drawings.Formatting
Module Tutorial22
Sub Main()
Console.WriteLine("Tutorial 22" & vbCrLf & "----------" & vbCrLf)
' Create an instance of the class that exports Excel filesDim workbook As New ExcelDocument
' Create an worksheet
workbook.easy_addWorksheet("SourceData")
' Get the table of data for the worksheetDim xlsFirstTab As ExcelWorksheet = workbook.easy_getSheet("SourceData")
Dim xlsTable1 = xlsFirstTab.easy_getExcelTable()
' Add data in cells for report header
xlsTable1.easy_getCell(0, 0).setValue("Show Date")
xlsTable1.easy_getCell(0, 1).setValue("Available Places")
xlsTable1.easy_getCell(0, 2).setValue("Available Tickets")
xlsTable1.easy_getCell(0, 3).setValue("Sold Tickets")
' Add data in cells for chart report values
xlsTable1.easy_getCell(1, 0).setValue("03/13/2005 00:00:00")
xlsTable1.easy_getCell(1, 0).setFormat(EasyXLS.Constants.Format.FORMAT_DATE)
xlsTable1.easy_getCell(2, 0).setValue("03/14/2005 00:00:00")
xlsTable1.easy_getCell(2, 0).setFormat(EasyXLS.Constants.Format.FORMAT_DATE)
xlsTable1.easy_getCell(3, 0).setValue("03/15/2005 00:00:00")
xlsTable1.easy_getCell(3, 0).setFormat(EasyXLS.Constants.Format.FORMAT_DATE)
xlsTable1.easy_getCell(4, 0).setValue("03/16/2005 00:00:00")
xlsTable1.easy_getCell(4, 0).setFormat(EasyXLS.Constants.Format.FORMAT_DATE)
xlsTable1.easy_getCell(1, 1).setValue("10000")
xlsTable1.easy_getCell(2, 1).setValue("5000")
xlsTable1.easy_getCell(3, 1).setValue("8500")
xlsTable1.easy_getCell(4, 1).setValue("1000")
xlsTable1.easy_getCell(1, 2).setValue("8000")
xlsTable1.easy_getCell(2, 2).setValue("4000")
xlsTable1.easy_getCell(3, 2).setValue("6000")
xlsTable1.easy_getCell(4, 2).setValue("1000")
xlsTable1.easy_getCell(1, 3).setValue("920")
xlsTable1.easy_getCell(2, 3).setValue("1005")
xlsTable1.easy_getCell(3, 3).setValue("342")
xlsTable1.easy_getCell(4, 3).setValue("967")
' Set column widths
xlsTable1.easy_getColumnAt(0).setWidth(100)
xlsTable1.easy_getColumnAt(1).setWidth(100)
xlsTable1.easy_getColumnAt(2).setWidth(100)
xlsTable1.easy_getColumnAt(3).setWidth(100)
' Add a chart sheet
workbook.easy_addChart("Chart", "=SourceData!$A$1:$D$5", Chart.SERIES_IN_COLUMNS)
' Get the previously added chartDim xlsChartSheet As ExcelChartSheet = workbook.easy_getSheetAt(1)
Dim xlsChart As ExcelChart = xlsChartSheet.easy_getExcelChart()
' Hide chart legend
xlsChart.easy_getLegend().setVisible(False)
' Show chart data table
xlsChart.easy_getChartDataTable().setVisible(True)
xlsChart.easy_getChartDataTable().getFontFormat().setFont("Verdana")
xlsChart.easy_getChartDataTable().getFontFormat().setFontSize(10)
xlsChart.easy_getChartDataTable().setHorizontalLines(False)
xlsChart.easy_getChartDataTable().setLegendKey(True)
xlsChart.easy_getChartDataTable().getLineColorFormat().setLineColor(Color.Blue)
xlsChart.easy_getChartDataTable().setVerticalLines(False)
' Export Excel file
Console.WriteLine("Writing file C:\Samples\Tutorial22 - Excel chart datatable.xlsx.")
workbook.easy_WriteXLSXFile("C:\Samples\Tutorial22 - Excel chart datatable.xlsx")
' Confirm export of Excel fileDim sError As String = workbook.easy_getError()
If (sError.Equals("")) Then
Console.Write(vbCrLf & "File successfully created. Press Enter to Exit...")
Else
Console.Write(vbCrLf & "Error encountered: " & sError & vbCrLf & "Press Enter to Exit...")
End If' Dispose memory
workbook.Dispose()
Console.ReadLine()
End Sub
End Module
