Слово зависает, когда макрос вызывает Excel, чтобы открыть - PullRequest
Новая
       18

Слово зависает, когда макрос вызывает Excel, чтобы открыть

3 голосов
/ 22 апреля 2019

Я пытаюсь импортировать данные из листа Excel в Word.

Но я довольно быстро терплю неудачу. Слово застревает в самом начале.

Мой код прост: 

Sub ImportDataFromExcel()

    Dim XLapp As Excel.Application

    Set XLapp = New Excel.Application    

End Sub

Вот что происходит: Excel открывается. Но Word замерзает сразу. Я должен заставить выйти из Word. Word не получит ни одной дополнительной строки кода, которую я включил. Он останавливается на „Set XLapp = New Excel.Application“.

Я попробовал пару вещей: Я написал подобный код, чтобы открыть PowerPoint. Это сработало.

Я написал похожий код в PowerPoint, чтобы открыть оттуда Word. Это сработало.

Я написал тот же код, который я разместил здесь, в PowerPoint, чтобы открыть Excel. Это так же не удалось!

И я тоже пробовал на другом Mac. Также там то же самое: Word зависает при вызове в Excel.

Я использую Office 365 с Word и Excel для Mac, версия 16.24. В качестве макроса в VBA я использую «Библиотеку объектов Microsoft Excel 16.0». Я использую MacOS Mojave (10.14.3) на моем Mac.

Может кто-нибудь, пожалуйста, помогите мне?

Ответы [ 2 ]

1 голос
/ 22 апреля 2019

У меня нет опыта решения этой проблемы на Mac Os, но, возможно, переписать тот же код другим способом, будет работать. Попробуйте это: 

Dim XLapp As New Excel.Application

Надеюсь, это поможет.

0 голосов
/ 22 апреля 2019

Попробуйте, пожалуйста 

Sub ImportDataFromExcel()

    Dim XLapp As Object

    Set XLapp = CreateObject("Excel.Application")

End Sub

Возможно, MAC не распознает библиотеку Excel

...