Hi levinator,
Thanks for considering Aspose.
Well I tested the following code using Aspose.Cells version 4.1.2.16 ( you may download it @: <A href="</A>) and I don't find any error and the output files (attached) are fine:</FONT></P><FONT color=#000000>
<P>'Instantiating an Workbook object</P></FONT>
<P><FONT color=#000000>Dim workbook As Workbook = New</FONT><FONT color=#000000> Workbook()</FONT></P>
<P><FONT color=#000000>'Adding a new worksheet to the Excel object</FONT></P>
<P><FONT color=#000000>Dim sheetIndex As Integer</FONT><FONT color=#000000> = workbook.Worksheets.Add()</FONT></P>
<P><FONT color=#000000>'Obtaining the reference of the newly added worksheet by passing its sheet index</FONT></P>
<P><FONT color=#000000>Dim worksheet As</FONT><FONT color=#000000> Worksheet = workbook.Worksheets(sheetIndex)</FONT></P>
<P><FONT color=#000000>'Adding a sample value to "A1" cell
worksheet.Cells("A1").PutValue(50)
'Adding a sample value to "A2" cell
worksheet.Cells("A2").PutValue(100)
'Adding a sample value to "A3" cell
worksheet.Cells("A3").PutValue(150)
'Adding a sample value to "B1" cell
worksheet.Cells("B1").PutValue(4)
'Adding a sample value to "B2" cell
worksheet.Cells("B2").PutValue(20)
'Adding a sample value to "B3" cell
worksheet.Cells("B3").PutValue(50)
'Adding a chart to the worksheet
Dim chartIndex As Integer = worksheet.Charts.Add(ChartType.Column, 5, 0, 15, 5)
'Accessing the instance of the newly added chart
Dim chart As Chart = worksheet.Charts(chartIndex)
'Adding NSeries (chart data source) to the chart ranging from "A1" cell to "B3"
chart.NSeries.Add("A1:B3", True)
'Converting chart to image.
Dim bitmap As Bitmap = chart.ToImage()
'Saving the chart image.
bitmap.Save("d:\test\chartimg.jpg", System.Drawing.Imaging.ImageFormat.Jpeg)
'Saving the excel file.
workbook.Save("d:\test\chartbook.xls")
Could you please send here your template file.
Thank you.