~帥氣欣的帥氣旅程~

網路上面多半使用ADO來存取Excel,但是個人覺得這種方式蠻不友善的. 尤其對於已經熟悉VBA的人來說, 能用VBA中的物件模型及概念應用在.net中來存取Excel才是真正的王道啊~ 在下面的範例中就是使用Excel的核心來存取資料: '範例 Imports Microsoft.Office.Interop.Excel Public Sub 存取Excel() Dim oExcel As Excel.ApplicationClass Dim oBook As Excel.WorkbookClass Dim oBooks As Excel.Workbooks Dim oSheet As Excel.Worksheet Try '建立Excel物件並開啟C:\01.xls中的Sheet1 oExcel = CreateObject("Excel.Application") oExcel.Visible = True oBooks = oExcel.Workbooks oBook = oBooks.Open("C:\01.xls") oSheet = oBook.Worksheets("Sheet1") '寫入資料至Sheet1中的A1儲存格 oSheet.Cells(1, 1).value = "Test" '讀取Sheet1中的A1儲存格 Dim test As String test = oSheet.Cells(1, 1).value.ToString '關閉並釋放Excel物件 oBook.Close(False) System.Runtime.InteropServices.Marshal.ReleaseComObject(oBook) oBook = Nothing System.Runtime.InteropServices.Marshal.ReleaseComObject(oBooks) oBooks = Nothing oExcel.Quit() System.Runtime.InteropServices.Marshal.ReleaseComObject(oExcel) oExcel = Nothing Catch ex As Exception End Try End Sub