La lecture des Informations à partir d'une zone de texte dans VBA dans PowerPoint

Je viens de découvrir sur VBA hier et je vais avoir du plaisir à jouer avec elle, cependant, j'ai rencontré un problème: comment lire le contenu d'un textbox. C'est la seule zone de texte sur la diapositive et je veux qu'il soit en mesure de s'appliquer à toutes les diapositives de la présentation PowerPoint. Merci de me demander de me préciser si cela ne fait pas sens.

--EDIT--
Fondamentalement, je veux lire le contenu d'une zone de texte, simple que cela.

--EDIT--
Voici mon code actuel:

Sub answer()
    Dim lCurrentView As Long
    Dim myInput As String
    Dim sld As Slide
    Set sld = Application.ActiveWindow.View.Slide
    myInput = sld.Shapes(4).TextFrame.TextRange.Text
    A = InputBox(prompt:="Your Answer:")
    MsgBox (myInput)
    If A = myInput Then
        MsgBox ("Correct!")
        ActivePresentation.SlideShowWindow _
        .View.GotoSlide Int(Rnd * _
        ActivePresentation.Slides.Count) + 1
    Else
        MsgBox ("Sorry, try again...")
    End If
End Sub
InformationsquelleAutor Theodore_Kim | 2014-03-04