У меня есть макрос, который позволяет мне выбирать слайды в Powerpoint на основе имен слайдов из поля ввода в Powerpoint.Однако это не работает, когда я открываю свою Powerpoint из Excel, и я обнаружил, что сначала мне нужно сохранить презентацию, прежде чем я смогу выбрать слайды, в противном случае он просто выбирает один слайд, даже если я ввел несколько имен слайдов в поле ввода.Это актуальная проблема.
Поэтому я бы хотел сохранить презентацию Powerpoint после того, как открыл ее из Excel, чтобы мой макрос в Powerpoint работал или кто-то знает, почему он просто выбирает один слайд, который был бы еще лучше.Например, если у меня есть слайды, которые называются slide1, slide2.slide3.Если я ввожу это из поля ввода, он просто выбирает slide1, но после сохранения документа Powerpoint выбирает slide1, slide2.slide3, который он должен.Я пытался сохранить презентацию Powerpoint с помощью .Save, но она не работает.Любая помощь высоко ценится.
Sub Open_Powerpoint()
Dim MyPPT As Object
Set MyPPT = CreateObject("Powerpoint.application")
MyPPT.Visible = True
MyPPT.presentations.Open "\\location_file\test.pptm"
MyPPT.presentations.Save
End Sub
Ожидаемый результат - открыть презентацию Powerpoint с именем test.pptm и затем сохранить ее, чтобы сработал мой макрос выбора слайдов.