本示例在一个窗口中运行幻灯片放映,并设置该幻灯片放映窗口的高度和宽度。

With Application
    .Presentations(1).SlideShowSettings.Run
    With .SlideShowWindows(1)
        .Height = 250
        .Width = 250
    End With
End With