求在ACCESS窗体中打开EXCEL工作簿中指定的工作表的V...-excel中打开vba,vba 打开excel

需要在VBE界面来上引用源Excel库才能打开百Excel文件度。最简单的语知句如下所示：道
Sub test()
Dim xcl As New Excel.Application
Dim wbk As Workbook
Set wbk = xcl.Workbooks.Open("E:\1.xls")
xcl.Visible = True
End Sub

如下参考：

1．首先，使用扩展XLSM将Excel文档（默认情况下是来新的扩展XLSX）保存为一个支持宏的工作源簿。

2．按ALt＋F11快速切换到VBA。

3．击VBA窗口后进入界面，如图所示。

4．双击此工作簿后，将弹出一个代码窗口。

5．在代码窗口中，复制并粘贴以下代码：PrivateSubWorkbook＿Open（），MsgBox（＂»ido－aueOAExcel2013£＇＂zhidao），EndSub。

6．保存、关闭并重新打开Excel文档（扩展名XLSM）。