An object model similar to the MS Excel object model was created in litXLS. It  make the development easy and it keeps the learning curve small for developers who already know the Excel object model.

litXLS fully supports VB's intellisense that gives the programmer help while creating the code. Care is taken to make working with litXLS as easy as possible. Should programmers need to refer to a full API description, we have written a full specification for it.

With a few lines of code you can instantiate the component. Most of the work will be done in litXLS's Worksheet object where you use the Cells property to access the cells on the sheet. Putting values in the sheet is as simpel as the following command shows:

Worksheet.Cells(myrow, mycolumn).Value = "Hello World"

When you have populated all the cells, you call the Workbook.SaveAs method. The new .xls file was created.

Sample projects are supplied with litXLS. Detailed examples are provided in the Visual Basic language (version 6), in VBS script and in VB.Net. It is perfectly possible to use the component in other development languages. Check the documentation that came with your development language whether you can use ActiveX dlls to find out whether you can use the litXLS component.

litXLS can be tried out before you buy it. When using the evaluation copy you can only populate cells in row 5. If a fully working trial version is required, please let us know.

As an example of how easy it is to create a .xls file with litXLS consider the following VB code that will create the file test.xls with the table of 7.

Dim wkb as litXLS.Workbook
Dim wks as litXLS.Worksheet
Dim xls as litXLS.clsXLS

Dim lngLoop as Long

'Instantiate litXLS
Set xls = New litXLS.clsXLS

'Create a new workbook and a new worksheet
Set wkb = xls.Workbooks.Add
Set wks = wkb.Worksheets.Add

'Loop to populate the cells
For lngLoop = 1 to 10

wks.Cells(lngLoop,1).Value = CStr(lngLoop) & " times 7 equals"
wks.Cells(lngLoop,2).Value = lngLoop * 7

Next lngLoop

'Save the file
wkb.SaveAs "c:\test.xls"

'Close litXLS
xls.ExitXLS

Licensing

Download litXLS for evaluation