篇一：如何在PPT上拆分汉字笔画
如何在PPT上拆分汉字笔画
首先在PPT里面将一个汉字拆分笔画，然后对每一个笔画设置呈现的动画效果，播放时汉字就是一笔一划动态呈现，从而实现汉字笔顺的动态化效果。
第一步：安装字体。
笔者实践表明：不是任何字体都可以完全拆分汉字笔画的，只有“仿宋_GB2312”和“楷体_GB2312”这两种字体才能实现。一般情况下，WindowsXP系统都会自带这两种字体，但Vista和Windows7系统不知何因缺失了这两种字体。所以，Wista和Windows7系统需要安装上述字体。鉴于小学教材汉字字体都属楷体，所以我们只需安装“楷体_GB2312”这一种字体即可。网上搜索“楷体_GB2312”的关键词，找到该字体的下载链接，进行下载。下载后，在后缀名是“ttf”的文件上单击右键，选择“安装”即可（如图1所示）。
图1 “楷体_GB2312” 字体的安装
第二步：插入“艺术字”。
打开Powerpoint（本文以2003版为例，2007和2010版方法亦然），点击插入“艺术字”，接着在“艺术字库”里选择左上角的“空心字”样式，输入想要处理的一个汉字（例如：“我”），设置字体为 “楷体_GB2312”，设置字号96，,选择“加粗”，“确定”（如图2所示）。此时如果觉得字大小还需要调动，可以在汉字上左键单击，按住Shift键的同时，用鼠标在汉字四角的任意一个小圆圈上拉动，进行等比例缩放汉字大小。
图2 艺术字“我”的设置
第三步：拆分汉字。
选中文字（“我”）→右键【剪切】→选择【编辑】菜单下的【选择性粘贴】命令→选择“图片（Windows元文件）” →确定。接着，在文字上右击→组合→取消组合→选择“是”，再次在文字上右击→选择【组合】【取消组合】（如图3所示）。
图3 拆分笔画后的“我”字
第四步：给笔画上色。
每一个字拆分后，都会在拆分的汉字笔画里出现2个空白文本框，我们需要将它删除，删除后，保留的就是该字的一笔一画了。删除空白文本框的方法：在页面按键盘上的tab
键，寻找空白文本框（空白文本框特点是在文字四周出现8个小圆圈：如图4所示），找到按住Delete键删除（“我”字我删除了两个这样的空白文本框）。结束后，为文字笔画上色。上色分为笔画统一上色和单独笔画上色（统一上色的前提是全选笔画；单独上色的前提是单选某一笔画，单选笔画用Tab键），两种上色效果如图5和图6所示。
图4空白文本框特点
图5 统一上色的“选中”和“结果”
图6 单独笔画的“选中”和“结果”
第五步：为所有笔画设置动画。
选中所有的笔画→选择【幻灯片放映】→【自定义动画】→【添加动画】→【进入】→
【擦除】。接着在右边的动画窗格进行笔画出现先后的调动，最后进行个别笔画动画方向的调整。设置动画开始时间。至此，这个我字的笔顺动画就设置成功了，播放一下。
如何插入二分之一（必需在2003wort里面）
1
插入（域）?Eq?公式编辑器E?公式里面找?2
篇二：如何一次性更改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中如何让文字一个一个出现后再退出
ppt中如何让文字一个一个出现后再退出
tenglei_kimi | 浏览 650 次 2015-10-03 15:15
我有更好的答案
1条回答
试一下这样：打开ppt文件，打开自定义动画面板，选中那个文本框，在自定义面板中，单击添加效果，选择进入，单击其他效果，打开对话框，在基本型中单击出现，确定，右击刚创建的自定义动画项，选择效果选项，打开“出现”对话框，单击效果选项卡，单击动画文本下拉按钮，选择按字母，根据所需快慢，调整字母之间延迟秒数（最低0.1；数字越小越快）。再次单击那个文本框，添加“消失”退出效果，打开“消失”对话框，动画文本：按字母，字母之间延迟秒数：最低0.1，适当调整。做自动退出：单击消失自定义动画项，单击开始下拉按钮，选择之后，完成，可以放映。欢迎提问。
热心网友| 2015-10-03 16:37
《在ppt中怎样拆散文字》出自：百味书屋
链接地址：http://www.850500.com/news/36855.html
转载请保留,谢谢!