Dim oExcelApp As New ExcelApplication()
Dim wb As Workbook = oExcelApp.Create(FileFormat.Xlsx)
Dim areaOne As Area= WB[0].CreateArea("A1:B3")
Dim fstream As New FileStream("C:\temp\outfile.xls", FileMode.Create)
areaOne.SaveImage(fstream, System.Drawing.Imaging.ImageFormat.PngmPng, 600, 400) |