Share via

Powerpoint for Mac 2016 - Editable / Interactive text?

Anonymous
2016-07-16T23:12:27+00:00

Is it possible to include interactive text in my slideshow, e.g. to type in a textbox during the presentation?

thanks,

Geoff

Microsoft 365 and Office | PowerPoint | For home | Windows

Locked Question. This question was migrated from the Microsoft Support Community. You can vote on whether it's helpful, but you can't add comments or replies or follow the question.

0 comments No comments

Answer accepted by question author

Steve Rindsberg 99,166 Reputation points MVP Volunteer Moderator
2016-07-19T00:18:59+00:00

Add this macro to your presentation (you'll need to save it as a PPSM rather than PPSX in order to preserve the macros)

Sub TextMe(oClickedShape As Shape)

    Dim oSh As Shape

    Dim sText As String

    For Each oSh In SlideShowWindows(1).View.Slide.Shapes

        If oSh.Name = oClickedShape.Name Then

            Exit For

        End If

    Next

    sText = InputBox("Type your text here", "Text. Gimme TEXT!", "")

    If Len(sText) = 0 Then

        Exit Sub

    End If

    oSh.TextFrame.TextRange.Text = sText

End Sub

For any shape whose text you want to edit during the slide show, give the shape an action setting of Run Macro and choose TextMe.

During the show, if you click on one of these shapes, you'll get an input box where you can enter the text you want and when you press OK, the shape's text will be added.

In theory, it shouldn't be necessary to check each shape on the slide and compare its name to the clicked shape's name, but this bit of Mac VBA/PPT is buggy so we have to go about it in a roundabout way.

Was this answer helpful?

4 people found this answer helpful.
0 comments No comments

1 additional answer

Sort by: Most helpful
  1. Anonymous
    2016-07-17T16:00:06+00:00

    Was this answer helpful?

    0 comments No comments