msoFileDialogFilePicker 导致错误

Question

请不要评论任何关于命名约定、方法、询问代码应该做什么或与我的问题没有直接关系的任何事情：

这对我来说每次都完美运行——弹出一个窗口，我选择多个 Excel 文件并将它们的数据上传到我的工作表中（代码未显示）。我的客户说他在运行它时遇到错误，我自然认为这是因为他在 Mac 上运行它......但他说他在 PC 和 Mac 上都遇到了错误。我可以'不要重新创建错误......我们就在这里。

这是有问题的代码，错误的行以黄色突出显示：

复制代码：

Sub Import_Employee_Sheet()
    With Application.FileDialog(msoFileDialogFilePicker)
        .AllowMultiSelect = True

        If .Show = True Then
        End If
    End With
End Sub

Answer 1

这可能是因为他没有在 IDE 的 Tools/References 下设置 Microsoft Object [Version number] Library 引用，或者因为它已损坏。另请参阅this 帖子，了解如何在不设置对象引用的情况下解决问题，以避免将来出现类似问题。

编辑

它应该是上面的“...不设置库引用”。