How do you create a "clear" slide and clear all slides that have content in an editable field?

Christie, Donnamarie 0

Created a macro enabled PP that has editable fields. I need to be able to allow clearing of the fields on each slide and it would be great to Clear ALL slides at the end of the PP. How do I do that?

John Korchok 5,171 Reputation points

2023-10-18T13:54:33.5966667+00:00

Are you referring to ActiveX controls added to the slides?

If your use case allows, create a template instead of using a presentation. Then a new presentation is created each time the template is double-clicked and all fields will be empty.
Christie, Donnamarie 0 Reputation points

2023-10-19T14:07:57.8166667+00:00

Thanks John. I tried the available active X controls but none had that functionality. It has to be within the current presentation (similar to a training module). When I click the command button, the VB code window opens. I just need to know how to write the code to clear the slide.
John Korchok 5,171 Reputation points

2023-10-19T14:34:54.4833333+00:00

You need to tell us how you're creating "editable fields". Searching on powerpoint VBA clear editable fields -word may get you starter code, then we can help you debug.
Christie, Donnamarie 0 Reputation points

2023-10-19T19:02:20.0233333+00:00

I am using the activeX TextBox in the developer tab to create the editable fields.

Christie, Donnamarie 0

Figured it out: it is,

Dim shape As shape
    For Each shape In ActivePresentation.Slides(3).Shapes
        If shape.Type = msoOLEControlObject Then
            If shape.Name Like "TextBox?" Then
                Set txtbx = shape.OLEFormat.Object
                txtbx.Text = ""
            End If
        End If
    Next shape

Share via

How do you create a "clear" slide and clear all slides that have content in an editable field?