篇一：如何一次性更改ppt中的全部字体
如何一次性更改ppt中的全部字体？
如何一次性更改ppt中的全部字体？起初这个我也不知道，也是在百度上搜索得来的。非常感谢大家！当然，我也要把这样的好东西共享一下，为大家节约时间！
先看第一种方法。一般高手都是用这种方法的，我不会用！
点击ppt中的工具里的宏选项里的宏。然后输入你要创建的宏名点击创建按钮，在出现的页面中将下面一段代码覆盖掉原先的代码：
Sub OED01() '批量修改字体格式、大小和颜色
Dim oShape As Shape
Dim oSlide As Slide
Dim oTxtRange As TextRange
On Error Resume Next
For Each oSlide In ActivePresentation.Slides
For Each oShape In oSlide.Shapes
Set oTxtRange = oShape.TextFrame.TextRange
If Not IsNull(oTxtRange) Then
With oTxtRange.Font
.Name = "楷体_GB2312" '改成你需要的字体
.Size = 20 '改成你需要的文字大小
.Color.RGB = RGB(Red:=255, Green:=0, Blue:=0) '改成你想要的文字颜色
End With
End If
Next
Next
End Sub
然后点击保存按钮，关闭窗口，回到ppt编辑页面。再次点击工具里的宏选项里的宏，选择你刚编辑好的宏，点击运行，这样你ppt中的所有字体都被改变了，想要变成什么样的字体可在代码里修改！
第二种方法，简单易懂，而且好操作！在ppt上面的工具条中，选择“视图”，然后“普通视图”，然后再幻灯片的左边，会出现一栏。在这一栏的上面有个选项“大纲/幻灯片”，点击“大纲”，这个时候，你激活其中任意一张幻灯片，全选，然后改到自己想改的格式就可以了。
如何将PPT里的文字全部改变字体颜色，
PPT里是黑底模板白色字体，想改成黑色字体白色模板打印，如何全部改掉，不要一个一个的改。 一次性修改所有ppt页面中字体的颜色和大小有朋友问我如何一次性修改所有ppt页面中字体的颜色和大小，由于powerpoint没有现成的菜单，今天索性写了一个宏，水平有限，不足之处请大家指正！Sub Macro1()For i = 1 To ActiveWindow.Selection.SlideRange.SlideNumber num =
ActiveWindow.Selection.SlideRange.Shapes.CountIf i =
ActiveWindow.Selection.SlideRange.SlideNumber Then num = num - 1End IfFor j = 1 To num ActiveWindow.View.GotoSlide Index:=i aaa =
ActiveWindow.Selection.SlideRange.Shapes(j).Name If InStr(1, aaa, "text box") > 0 Then ActiveWindow.Selection.SlideRange.Shapes(j).Select
ActiveWindow.Selection.ShapeRange.TextFrame.TextRange.Select
ActiveWindow.Selection.ShapeRange.TextFrame.TextRange.Font.Size = 20 '改成你想要的字体大小 ActiveWindow.Selection.TextRange.Font.Color.RGB = RGB(Red:=255, Green:=0, Blue:=0) '改成你想要的字体颜色 End If If InStr(1, aaa, "Rectangle") > 0 Then
ActiveWindow.Selection.SlideRange.Shapes(j).Select
ActiveWindow.Selection.TextRange.Font.Size = 20 '改成你想要的字体大小
ActiveWindow.Selection.TextRange.Font.Color.RGB = RGB(Red:=255, Green:=0, Blue:=0) '改成你想要的字体颜色 End IfNext jNext iEnd Sub
答案补充
格式-幻灯片设计-“幻灯片设计-配色方案” 选一个你要的颜色 文字和符号都会变颜色不过貌似对PPT背景也有影响 你先试下 不行我再研究研究
在 视图》母版》幻灯片母版 里面改。
批量修改ppt中所有字的字体颜色
本篇文章将会告诉你，怎样利用office中的宏，批量修改PPT中所有字的字体、颜色、字号、背景等。今天我一朋友来找我，说他想打印一个PPT，于是想把它变成白底黑字，并保存。我翻了半天，发现office本身是没有这个功能的，于是我终于找到了一个方法来实现。（以下演示版本为Office2007，其他版本的类似）
1、背景模板的处理
打开幻灯片母板，选择插入新的幻灯片母板，得到一个空白的母板。
然后删除掉原来的母板。还原普通视图，这样就去掉了幻灯片的模板背景。
2、利用宏批量改变字体
在视图中选择宏（早期版本可能要在插入中找），输入任意的宏名，点击创建。
在新代码窗口中，删除原来的内容，并复制以下内容，然后运行宏（若不能运行，请看下面）。此时工作已经全部完成了。 Sub myfont()
Dim oShape As Shape
Dim oSlide As Slide
Dim oTxtRange As TextRange
On Error Resume Next ' 之后的代码就算出错也会继续执行
For Each oSlide In ActivePresentation . Slides
oSlide . FollowMasterBackground = msoTrue ' 使用幻灯片母版背景
For Each oShape In oSlide . Shapes
' 文本框字体设置
With oShape . TextFrame . TextRange . Font
' .Name = "宋体"
' .Size = 20
. Color . RGB = RGB(Red : = 0 , Green : = 0 , Blue : = 0 )
' .Bold = msoFalse '粗
. Italic = msoFalse ' 斜
. Underline = msoFalse ' 下划线
End With
oShape . Fill . Background ' 文本框背景色用幻灯背景填充
oShape . TextFrame . TextRange . IndentLevel = 0
' 表格字体设置
oShape . Table . Background . Fill . BackColor . RGB = RGB(Red : = 255 , Green : = 255 , Blue : = 255 ) ' 底色
For i = 1 To oShape . Table . Rows . Count
For j = 1 To oShape . Table . Columns . Count
oShape . Table . Cell(i, j) . Shape . Fill . BackColor . RGB = RGB(Red : = 255 , Green : = 255 , Blue : = 255 )
With oShape . Table . Cell(i, j) . Shape . TextFrame . TextRange . Font
' .Name = "宋体"
' .Size = 20
. Color . RGB = RGB(Red : = 0 , Green : = 0 , Blue : = 0 )
' .Bold = msoFalse '粗
. Italic = msoFalse ' 斜
. Underline = msoFalse ' 下划线
End With
Next j
Next i
Next
Next
End Sub
篇二：如何让ppt字体在任意电脑中不发生改变
将字体嵌入PowerPoint文件随身携带 我们经常会遇到这样的情况：由于每台计算机中安装的字体文件不同，在一台计算机上制作好的PowerPoint课件在另一台计算机上打开时，设定的字体会发生改变，影响课件的播放效果。
其实，只要在保存PowerPoint文件时选择“嵌入TrueType字体”，就可以让PowerPoint将字体“随身带”了。设置方法如下。
方法一：
1. 打开ppt，点击左上角“Office按钮”，在最下面找到“PowerPoint选项”并点击。
2. 这时弹出来一个“PowerPoint选项”对话框，选择“保存”，右边对应出现“自定义文档保存方式”，往下找到“共享此演示文稿时保持保真度”。
3. 在“将字体嵌入文件”前打勾，最后点击“确定”完成设置。 方法二：
打开一个PowerPoint文件，单击菜单栏中的〔工具〕按钮，在下拉菜单中选择“选项”命令，系统会打开“选项”对话框，切换到“保存”标签，选中其中的“嵌入TrueType字体”选项。为了减少演示文稿的容量，在选中“嵌入TrueType字体”选项后，再选定下面的“内嵌入所用字符”选项。单击〔确定〕关闭“选项”对话框。
图1 PowerPoint保存选项
篇三：更改PPT所有页面字体与页面颜色的技巧(绝对实用)
更改PPT所有页面字体与页面颜色的技巧（绝对实用）
2010-07-01 11:03:06| 分类： 电脑知识 |字号 订阅
我想大家都遇到过类似情况，就是有时想把PPT打印出来备课用，可以在纸上写写画画对课件做标注之类的，但若是你的PPT原本是深色背景，如我有时喜欢用深蓝背景、白色字体，这样打印时很费墨的，因为打印出来整张纸背景都是深灰色或黑色！这时你肯定想同时更改所有页面的背景颜色和字体颜色（大款及不想为基金省钱的除外）。几页还好说，一页一页改就是了，但我的PPT往往一章都在一起，多达100多页，怎么办？
人民的智慧是无穷的！本人自己发现加上网络资料，总结了三种方法（备注：以下方法在Powerpoint2000中使用，对于更高版本，操作情况类似）：
1. 最简单最好用的方法（五星推荐）！打开你要打印的PPT课件，点击视图——黑白，OK！你发现什么了？你的所有PPT都变成了黑白灰色，包括图片，所有页面背景是正常白色，所有字体是黑色（包括链接），原来你用的设计模板的颜色样式这时完全不起作用了！放心去打印吧！而且你还会发现一点，就是当你关闭文件时，并无提示让你重新保存；而当你再一次打开这个PPT，你会惊喜地发现，PPT并无改变，页面背景、字体颜色等还是你原来的色彩，也即“点击视图——黑白”这样的操作完全不改变你的原文件，改变的只是视图！另外，如果你不希望打印原来模板的背景图形，可以在任一页面无内容的空白处点击右键，选择背景，选择忽略母版的背景图形，再选择全部应用即可，但这时就会改变你的原文件，不过没关系，打印完后，再改回来就是了。
来源：(http://blog.sina.com.cn/s/blog_4a739ed00100gdkf.html) - 更改PPT所有页面字体与页面颜色的技巧（绝对实用）_落叶无垠_新浪博客
我写此文前搜索了大量相关网页，似乎还没看到有此方法。专利！！！
2. 方法2。打开你要打印的PPT课件，在任一页面无内容的空白处点击右键，选择幻灯片配色方案，你可以点击选用标准配色方案中有黑白灰三色的方案；也可自定义配色方案颜色，把所有背景色变为白色、字体变为黑色等。但如此做有一不完善之处，即那些你在做PPT时设置了特定填充色和特定字体颜色的文本框（不是你的PPT模板默认的颜色）会改成其设定颜色的反色，也即这些文本框需要你手动修改，好在一般这样的文本框不多。
3. 方法3。不仔细说了，用宏语言！相信大多数人不熟悉，也不想找这个麻烦。有兴趣的可搜索网上相关信息。
最后说说有关打印PPT的知识，还是和节省资源有关。想必你不希望一张A4纸只
打印一张PPT，但你若用Powerpoint自带的打印工具在一张纸上打印多张PPT，会发现每个PPT页面都很小，这时你别使用Powerpoint自带的打印工具设置，而应该用打印机属性来设置在一张纸上打印多张PPT；或者使用软件fineprint，这个软件就是为一张纸上打印多张编写的，使用极其灵活，支持多种文件格式。
《如何设置ppt字体》出自：百味书屋
链接地址：http://www.850500.com/news/36844.html
转载请保留,谢谢!