vba - 用户类型未定义工作表 VBA

Question

我试图添加对我的项目的引用，以便我可以解决这个错误，但我没有成功。

谁能告诉我应该添加哪些库？

Dim objFSO As Object
Dim objFolder As Object
Dim objFile As Object
Dim ws As Worksheet

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set ws = Worksheets.Add

 'Get the folder object associated with the directory
Set objFolder = objFSO.GetFolder("C:\")
ws.Cells(1, 1).Value = "The files found in " & objFolder.Name & "are:"

 'Loop through the Files collection
For Each objFile In objFolder.Files
    ws.Cells(ws.UsedRange.Rows.Count + 1, 1).Value = objFile.Name
    MyFile = objFile.Name
      NewName = getNewFileName()

Answer 1

如果您在 Word IDE中工作，请转到工具 -> 参考并浏览Microsoft Excel [版本号] 对象库：

Answer 2

您已标记问题word-vba，但您使用的Worksheets是 Excel 中的参考资料。

如果您确实Worksheets在 Word 中使用该引用，您将收到User-defined type not defined-error。

如果没有，则缺少其他内容，您需要告诉我们更多信息。错误突出显示哪一行等。