1.请老师帮忙如何一次性地将PPt里的字体改成黑色的
PPT我不擅长，但我可以用宏帮你一次搞定。同时按Alt和F11进入宏界面，点菜单的插入，模块，粘贴如下代码：
Sub test()
Dim i, j As Integer
For i = 1 To ActivePresentation.Slides.Count
For j = 1 To ActivePresentation.Slides(i).Shapes.Count
ActivePresentation.Slides(i).Shapes(j).TextFrame.TextRange.Font.Color = vbBlack
Next
Next
End Sub
在此界面直接按F5运行此宏，完成。
扫描二维码打开小程序直接免费下载
 |
声明：本站所有文章，如无特殊说明或标注，均为本站原创发布。任何个人或组织，在未征得本站同意时，禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益，可联系我们进行处理。
