r-ReporteRS不遵守模板项目符号

Question

我试图使用R包ReporteRS创建一个演示文稿。无序列表似乎只遵循ReporteRS设置的有限选项。有没有办法让GetReporteRS遵守模板中的默认值？

Answer 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