Hello - i need a simple VBA to clear shape borders on all slides. the one i have below is not really working...i think the shapeborder.clear is not right.

any ideas the right fix should be? thank you!



Sub RemoveShapeBorder()


Dim sld As Slide
For Each sld In ActivePresentation.Slides
sld.ShapeBorder.Clear


Next
End Sub