easy添加引用 mircosoft excel （版本號）Dim xlApp As Excel.ApplicationDim xlBook As Excel.WorkbookCommonDialog1.InitDir = "桌面\"CommonDialog1.Filter = "EXCEL工作表(*.xls)|*.xls"CommonDialog1.ShowOpenSet xlApp = CreateObject("Excel.Application")Set xlBook = xlApp.Workbooks.Open(CommonDialog1.FileName)xlBook.Sheets(1).Cells(1, 1).Value = 'aaa'//這個是賦值如果要獲取屬性的話，可以定義變量取屬性xx = xlBook.Sheets(1).Cells(1, 1).Font.size所以，如果你想知道某一個屬性就在excel里面錄制一個宏，這樣就可以看到對應(yīng)是對象了然后在取數(shù)字關(guān)閉excelxlApp.ActiveWorkbook.ClosexlApp.Quit提醒：個別電腦會出現(xiàn)關(guān)閉excel后，系統(tǒng)進(jìn)程里面依然會出現(xiàn)excel。exe解決方法不明建議使用excel2002以上的版本會好一點
