PPT怎么批量换字体

VBA

这串代码有点问题啊，看这应该是想批量改PPT里所有页面的字体颜色和大小吧？不过代码里有些地方看着不太对劲，像是殖挥钱践盟、术径规这些明显是乱码或者被污染的部分，应该是复制的时候出错了。正常的VBA代码不可能有这种奇怪的字符，估计你这串代码直接从某些网页或者文档里复制过来的时候被搞乱了。建议你重新找个干净的地方复制，或者手动重新输入一遍，尤其是那些关键词，比如Shapes(j).Select、TextRange这些部分。如果你是想批量修改PPT中所有幻灯片的文字样式，建议用标准的VBA语法来写，比如遍历每一页幻灯片，然后对每个文本框进行操作。你这段代码的思路是对的，但得先把乱码的地方修复了，不然根本跑不起来。你可以试试去官方论坛或者靠谱的技术博客找一下标准的代码示例，再结合自己的需求改一下。要是实在搞不定，也可以贴出你遇到的问题，大家一起来帮你看看怎么改。