Microsoft Office Forums - View Single Post - How to hide the Audio Icon while PRINTING

JohnWilson · 10-30-2014, 03:33 PM

No inbuilt way I know of but a little macro would automate moving all off slide. Make sure you test on a COPY

Code:

Sub moveEM()
Dim oshp As Shape
Dim osld As Slide
For Each osld In ActivePresentation.Slides
For Each oshp In osld.Shapes
If oshp.Type = msoMedia Then
If oshp.MediaType = ppMediaTypeSound Then
oshp.Top = -oshp.Height
oshp.Left = 0
End If
End If
Next oshp
Next osld
End Sub