0

我试图使用R包创建演示文稿ReporteRS。无序列表似乎只服从ReporteRS. 无论如何要让 getReporteRS遵守模板中的默认值吗?

4

1 回答 1

1

解决此问题的方法虽然不是很优雅,但使用VBA或重置幻灯片VBScript。下面是我使用重置所有幻灯片的解决方案VBScript。简单地将文件拖放到使用.vbs扩展名保存的脚本上。

Dim inputFile
Dim objPresentation

inputFile = WScript.Arguments(0)
Set objPPT = CreateObject("PowerPoint.Application")
objPPT.Visible = True
objPPT.Presentations.Open inputFile
Set objPresentation = objPPT.ActivePresentation

slideCount = objPresentation.Slides.Count

For i = 1 to slideCount
    objPresentation.Slides(i).Select
    objPresentation.Application.CommandBars.ExecuteMso("SlideReset")
Next

objPresentation.Save
objPPT.Quit
于 2016-01-11T07:23:20.423 回答