Поскольку мы знаем, что номер слайда и имя слайда различаются, мы используем номер слайда для вызова фигур и имя слайда для вызова объектов ActiveX в PowerPoint
Я могу использовать ActivePresentation.Slides(CurrentSlideNo).Shapes("CA").TextFrame.TextRange для поиска текст в этой форме.
Я не могу использовать то же самое, чтобы найти значение TextBox (ActiveX Object). Мне бы пришлось сделать что-то вроде Slide3.TextBox1.Value.
Dim CurrentSlideNo As Integer
CurrentSlideNo = ActivePresentation.SlideShowWindow.View.Slide.SlideIndex
Dim CurrentSlideName As String
CurrentSlideName = ActivePresentation.Slides(CurrentSlideNo).Name
MsgBox CurrentSlideName.TextBox1.Value
Я пытался сделать выше, но это явно не сработало. Я получаю ошибку Invalid Qualifier. Я был бы очень признателен, если бы кто-то мог направить меня сюда. Спасибо!
Я могу получить название слайда в виде строки. Я просто не могу преобразовать его в квантификатор.
MsgBox ActivePresentation.Slides(1).Shapes(1).OLEFormat.Object.TextBox1.Value также не позволил мне получить value.