msoFileDialogFilePicker 导致错误

Question

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

这对我来说运行得很好，每次——弹出 window，我 select 多个 Excel 文件，它们的数据上传到我的 sheet（代码未图示）。我的客户说他在运行它时遇到错误，我自然认为这是因为他在 Mac 上运行...但他说他在 both 上遇到错误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 post 了解如何在不设置对象引用的情况下解决问题以避免将来出现类似问题。

编辑

上面应该是“...没有设置库引用”。

msoFileDialogFilePicker 导致错误

msoFileDialogFilePicker resulting in error

excel

vba

filedialog