Изменить одно интерактивное текстовое поле на основе ввода другого

Question

У меня есть интерактивный textbox в моем PowerPoint, в который я могу вводить текст в режиме презентации. Мне интересно, как я могу изменить текст в другом интерактиве textbox на другом слайде на то, что я ввел в исходном интерактиве textbox?

Я пробовал код в vba:

ActivePresentation.Slides(8).Shapes("TextBoxNAME2").TextFrame.TextRange.Text = "TEST" 

безрезультатно. Есть идеи?

Answer 1

Относительно вашего образца

ActivePresentation.Slides(8).Shapes("TextBoxNAME2").OLEFormat.Object.Text = "TEST"

Или, может быть, это. Если это объект ActiveX Textbox, вы можете использовать обработчик событий:

' put this in Slide's module, where You input new value at
' e.g Slide No.1 Module
Private Sub TextBox1_LostFocus()
    ' You want to update TextBox1 ona Slide 2
    Slide2.TextBox1.Text = Me.TextBox1.Text
End Sub