本示例设置打印时打印幻灯片边框。

Application.Presentations(1).PrintOptions.FrameSlides = ksoTrue