001:Private Sub Form_Click()
002:Dim XlsObj As Excel.Application
003:Set XlsObj = CreateObject("Excel.Application")
004:Set xlbook = XlsObj.Workbooks.Open("E:\test.xls")
005:XlsObj.Visible = True
006:End Sub
通过测试代码,我总结下面的结论,不知道对不对,请老师指点,谢谢!
一、在第4行打开工作簿之前必须先经过第3行的创建EXCEL对象才行。
二、第5行的代码是必须的,当然放在第4行上边或下边效果一样。