Question

我正在尝试将数据从Excel工作表导入Word。

但是我很快就失败了。词一开始就卡住了。

我的代码很简单：

Sub ImportDataFromExcel()

    Dim XLapp As Excel.Application

    Set XLapp = New Excel.Application    

End Sub

这是发生了什么： Excel打开。但是Word立即冻结。我必须强迫戒烟。 Word无法进入我包含的任何其他代码行。它停在„Set XLapp = New Excel.Application“。

我尝试了几件事：我写了类似的代码打开PowerPoint。可行。

我在PowerPoint中编写了类似的代码，以便从那里打开Word。可行。

我在PowerPoint中编写了与此处发布的代码相同的代码，以打开Excel。同样失败了！

我还尝试了另一台Mac。同样，同样的事情：在Excel上调用时Word冻结。

我将Office 365与Word和Excel for Mac，版本16.24结合使用。作为VBA中的宏引用，我使用“ Microsoft Excel 16.0对象库”。我在Mac上运行MacOS Mojave（10.14.3）。

有人可以帮助我吗？

Answer 1

我在Mac Os上没有这个问题的经验，但是也许可以用不同的方式重写相同的代码。试试这个：

Dim XLapp As New Excel.Application

希望这会有所帮助。

Answer 2

请尝试

Sub ImportDataFromExcel()

    Dim XLapp As Object

    Set XLapp = CreateObject("Excel.Application")

End Sub

也许MAC无法重新识别excel库