Interesuje me kako se radi integracija vb.net 2008 i excel-a. Tacnije treba mi mogucnost da napravim novi .xls fajl, otvorim ga upisem nesto i na kraju zatvorim.
Nasao sam neke primere na netu, ali postoji problem da mi excel.exe proces ostane aktivan i sl.
Ovo je primer koji sam nasao...
1. Dodam referencu na Microsoft Excel Object 12.0
2. Imports Excel = Microsoft.Office.Interop.Excel
3. kod->
Dim xlApp As Excel.Application
Dim xlWorkBook As Excel.Workbook
Dim xlWorkSheet As Excel.Worksheet
Dim oldCI As System.Globalization.CultureInfo = _
System.Threading.Thread.CurrentThread.CurrentCulture
System.Threading.Thread.CurrentThread.CurrentCulture = _
New System.Globalization.CultureInfo("en-US")
'Dim misValue As Object = System.Reflection.Missing.Value
xlApp = New Excel.ApplicationClass
xlWorkBook = xlApp.Workbooks.Add()
xlWorkSheet = xlWorkBook.Sheets("sheet1")
xlWorkSheet.Cells(1, 1) = "http://vb.net-informations.com"
xlWorkSheet.SaveAs("C:\vbexcel.xls")
xlWorkBook.Close()
xlApp.Quit()
System.Threading.Thread.CurrentThread.CurrentCulture = oldCI
releaseObject(xlApp)
releaseObject(xlWorkBook)
releaseObject(xlWorkSheet)
Private Sub releaseObject(ByVal obj As Object)
Try
System.Runtime.InteropServices.Marshal.ReleaseComObject(obj)
obj = Nothing
Catch ex As Exception
obj = Nothing
Finally
GC.Collect()
End Try
End Sub
Ovde postoji problem da mi ostane aktivan excel.exe proces i kad otvaram fajl pojavi mi se dijalog kao na slici