Откройте презентацию PowerPoint из Excel с помощью VBA, а затем установите эту презентацию в переменную

Question

Мне нужно опубликовать много графиков Excel для конкретного документа PowerPoint, и я создаю макрос в Excel VBA, чтобы сделать это для меня.

Я могу правильно открыть презентацию PowerPoint, которую хочу обновить, однако я не знаю, как настроить презентацию, которую я только что открыл, для переменной с именем MyPresentation.

Dim myPresentation As PowerPoint.Presentation 
Dim PowerPointApp As PowerPoint.Application 

PowerPointApp.Presentations.Open Filename:="obscured filepath and name"` 

Очевидно, есть некоторый дополнительный код, но я пытаюсь установить презентации я только что открылся в строке 3 набора переменной MyPresentation так что я могу сослаться на документ, я только что открылся.

Answer 1

В итоге я нашел решение MVP Andy Pope.

Некоторые соответствующие фрагменты кода для будущих пользователей. (FYI Мой РРТ уже был виден, когда я столкнулся с проблемой)

Dim DestinationPPT As String 
Dim PowerPointApp As PowerPoint.Application 
Dim myPresentation As PowerPoint.Presentation 

'Easier to define manually set links up front so it's easier to change/modify 
DestinationPPT = "C:\yourfilepath\yourfilename.pptx"` 

Поиск электронных таблиц руководство гуру для открытия РРТ из Excel VBA

Тогда:

Set myPresentation = PowerPointApp.Presentations.Open(DestinationPPT)