16,717
社区成员
发帖
与我相关
我的任务
分享
Dim xlApp As Microsoft.Office.Interop.Excel.Application
xlApp = CType(CreateObject("Excel.Application"),Microsoft.Office.Interop.Excel.Application)
Dim xlBook As Microsoft.Office.Interop.Excel.Workbook
xlBook = xlApp.Workbooks.Open("E:\ClothApplicatin_Sec\Data\2008122133724127001.xls")
Dim xlSheet As Microsoft.Office.Interop.Excel.Worksheet