在Powerpoint中用VBA替换字体
伊兰·考夫曼
我需要在Powerpoint演示文稿中替换字体（替换功能无法做到）。我从Microsoft找到了VBA脚本，但是我不知道下一步该怎么做。有人可以帮忙吗？
https://docs.microsoft.com/zh-cn/office/vba/api/powerpoint.fonts.replace
约翰·科乔克
要使用该行代码，只需在Visual Basic编辑器的“即时”窗口中运行它即可。使用Alt + F11或Alt + L + V打开VBE。在即时窗口的底部，粘贴代码，点击回车键来运行它：
如果VBA不足以更改字体，则可以使用OOXML hack来执行作业。将文件结尾更改为.zip并将其展开。然后使用文本编辑器（如NotePad ++）对所有文件运行查找和替换，更改
typeface="Time New Roman"
至
typeface="Courier"
使用Windows Zip实用程序重新压缩可能会出现问题，因为很容易包含它创建的额外的顶级文件夹，从而破坏了XML。而是使用WinZip或7Zip重新压缩。这是我关于OOXML骇客的介绍性文章：OOXML骇客：简介
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
- 上一篇：DNN UrlRewrite（“ DotNetNuke.HttpModules.UrlRewriteModule，DotNetNuke.HttpModules”）不在web.config上运行自定义重写规则
- 下一篇：找不到松弛的Web API返回通道chat.postMessage到私有通道
相关文章
Related 相关文章
- 1
替换PowerPoint 2016中的所有字体？
- 2
在PowerPoint中使用VBA更改字体
- 3
在VBA中用零替换异常值
- 4
VBA用于在文本溢出时缩小PowerPoint中的字体
- 5
在Excel中用VBA替换Chr（160）时出现问题
- 6
如何使用VBA替换整个Powerpoint（包括表格）中的单词？
- 7
如何在Rails应用程序中用自定义图标替换字体真棒图标
- 8
PowerPoint将替换掉专门用于Calibri的缺少的自定义字体吗？
- 9
Powerpoint字体家族
- 10
在Clojure中用\替换\
- 11
在javascript中用“”替换“”
- 12
在BeautifulSoup中用href替换<a> </a>
- 13
在Clojure中用\ *替换*
- 14
在Clojure中用\替换\
- 15
在PHP中用“ /”替换“ \ /”
- 16
Powerpoint中使用的字体数
- 17
如何使用VBA在文本文件中用空格替换逗号
- 18
使用VBA将MS PowerPoint中的现有图像替换为新图像
- 19
在Powerpoint互操作中用颜色填充形状
- 20
如何替换未知字体？
- 21
如何替换未知字体？
- 22
替换字体类
- 23
HTML替换字体标签
- 24
Powerpoint VBA哈维球
- 25
在MATLAB中用bsxfun替换repmat
- 26
在TemplateField中用Headertemplate替换HeaderText
- 27
在TFS中用分支替换中继
- 28
如何在r中用“ \”替换“ /”？
- 29
在R中用复杂的for循环替换
我来说两句