Scott Hanselman posted about fixing images that have been distorted in PowerPoint when moving from a 4:3 to to 16:9 aspect ratio. But what if you have many distorted images in your deck. If you manually try to correct those aspect ratios according to the instructions at the link above, you’ll be in for a lot of work.
However, if you aren’t afraid of working with VBA macros then below is a little bit of code that may help. It will reset the aspect ratio for all images in your deck.
Sub SetScaleSizeForAllImages() Dim s As slide Dim sh As shape Dim factor As Single factor = 1.0 For Each s In ActivePresentation.Slides For Each sh In s.Shapes If sh.Type = msoPicture Then sh.ScaleHeight factor, msoTrue sh.ScaleWidth factor, msoTrue End If Next sh Next s End Sub