代码执行后打开一个excel工作簿

我知道这已经被问过，但是对于我的生活，我无法得到这个简单的代码工作。 Dim wbopen As Workbook行上不断收到编译错误“用户定义types未定义”。 我知道工作簿必须打开来定义它，文件path应该是Z：\ Manufacturing \ 02- Schedules \ 01-缓冲区准备，而文件名是文件夹中唯一的.xls。 为什么发生这种情况？ 此外，这是在一个Word文件中执行。 不知道这是否重要。 感谢大家！

 Sub fileopen() Dim wbopen As Workbook Dim strFileName As String Dim strFilePath As String strFilePath = "Z:\Manufacturing\02- Schedules\01- Buffer Prep\" strFileName = Dir(strFilePath & "*.xls") Set wbopen = Workbook.Open(strFileName) End Sub 

Answer 1

它确实是一个Word文档。 您必须添加对Microsoft Excel对象库的引用。 从顶部的酒吧：
Tools -> References ->findMicrosoft Excel [version number] Object Library并检查它。