Share via

Deleting ink markup in Powerpoint 2016

Anonymous
2018-06-09T17:12:48+00:00

As a teacher, I regularly mark up my PowerPoint presentations and save the markup to send to my students at the end of the class.  Then before the beginning of the next class with a different group of students, I erase/delete all of my ink markings in a powerpoint file using the "Delete All Comments and Ink in This Presentation" function. Then I can present the material to the new students and make ink markings in real time.

Unfortunately, the "Delete All Comments and Ink in This Presentation" option is gone in Powerpoint 2016 Version 1805. It seems to be replaced by the "Hide Ink" function.  But when I use the "Hide Ink" function, the old ink reappears when I try to write on the slide.  I now have to go through each slide and laboriously select the ink and delete it.  Since I use several hundred slides a week, this takes an additional hour or so that used to take only a few seconds per ppt file.

Is there a way to delete all ink in a file in the new Powerpoint 2016 Version 1805?

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

2 answers

Sort by: Most helpful
Most helpful Newest Oldest
  1. Anonymous
    2018-06-09T17:39:34+00:00

    Looks like you might have to use a macro

    Sub zapInk()

        Dim osld As Slide

        Dim L As Long

        For Each osld In ActivePresentation.Slides

            For L = osld.Shapes.Count To 1 Step -1

                If osld.Shapes(L).Type = 23 Then osld.Shapes(L).Delete

            Next L

        Next osld

    End Sub

    13 people found this answer helpful.
    0 comments
  2. Anonymous
    2018-06-14T04:13:15+00:00

    Thanks John, I had the exact same problem and you just saved my sanity.

    I really, really need to learn more VBA.

    0 comments