msoFileDialogFilePicker导致错误

Question

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

这对我来说非常适合每次 - 弹出一个窗口，我选择多个Excel文件，他们的数据被上传到我的工作表中（代码未图示）。我的客户说他在运行时遇到错误，我自然认为这是因为他在Mac上运行它...但他说他在 PC和Mac上都出错了。我可以＆ ＃39;重新创建错误......我们在这里。

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

复制代码：

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

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

Answer 1

这可能是因为他没有在IDE中的工具/引用下设置duration(4i)引用，或者因为它被破坏了。另请参阅this帖子，了解如何解决问题，不要设置对象引用，以避免将来出现类似问题。

修改

它应该读取＆＃34; ...而不设置库引用＆＃34;上方。