本示例将当前演示文稿幻灯片的高度设为 25 英寸,宽度设为 11 英寸。
With Application.ActivePresentation.PageSetup
.SlideWidth = 11 * 72
.SlideHeight = 25 * 72
End With