中如何使用宏

1、ppt中如何使用宏我有一些ppt，我想把里面的字体全部设置成黑体，白色，如何用宏做到？给段编码也成，附上简短教程。谢谢了 利用宏批量改变字体 在视图中选择宏（早期版本可能要在插入中找），输入任意的宏名，点击创建。 在新代码窗口中，删除原来的内容，并复制以下内容，然后运行宏（若不能运行，请看下面）。此时工作已经全部完成了。 Sub myfont()Dim oShape As ShapeDim oSlide As SlideDim oTxtRange As TextRangeOn Error Resume Next ' 之后的代码就算出错也会继续执行For Each oSlide

2、 In ActivePresentation.SlidesoSlide.FollowMasterBackground = msoFalse  ' 使用幻灯片母版背景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 = ms

3、oFalse  ' 斜.Underline = msoFalse  ' 下划线End WithoShape.Fill.Background ' 文本框背景色用幻灯背景填充oShape.TextFrame.TextRange.IndentLevel = 0' 表格字体设置oShape.Table.Background.Fill.BackColor.RGB = RGB(Red:=255, Green:=255, Blue:=255)         

4、0;   ' 底色For i = 1 To oShape.Table.Rows.CountFor j = 1 To oShape.Table.Columns.CountoShape.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 =

5、 RGB(Red:=0, Green:=0, Blue:=0)' .Bold = msoFalse '粗'.Italic = msoFalse  ' 斜'.Underline = msoFalse  ' 下划线End WithNext jNext iNextNextEnd Sub注意： 1.以上代码相应部分可以根据需要自行修改 2.运行后可能仍有部分是彩色。如：表格的内嵌，项目符号编号，图片等。前两项仍然需要手动修改颜色。 不能运行宏的解决办法 点击左上角菜单，选择PPT选项 信任中心->宏设置，选中

6、启用所有和信任对VBA的访问，确定。然后重启PPT即可。 评论(0) 0 0 发表评论 其他回答(1)热心问友 2012-01-08 PPT是一款既简单又实用的软件，用好了可以做出很好的课件，怕自己忘记了，特在这里做点小结1 如果要制作简单的PPT文稿，则直接新建然后在右边那里选择本机上的模板，那里很多很好的模板，做简单的文稿足够了2.页面里的特效在标题栏的幻灯片放映自定义动画里，你可以选择路径，出现时候的特效，退出时候的效果，有路径，则可以制作高级点的交互性文档，比如：连线3.如何把自己从网上找的图片做为PPT模板？在标题栏的视图母版里把原来的母板里的图片删除了粘贴自己的图片，然后把位置大小

7、调好，就可以了4.如何把自己找的图片都应用到PPT里去，但是又不是作为母板？在正文里右键背景，在背景里有个下选框，选择填充效果你会看到图片，选择图片标签然后预览里上传你自己的图片5.如何做链接？打了一段文字后，选择文字，然后右键超链接，然后你把它链接到你要链到的页面同理，你打退出然后链到最后一页，则是一个按钮了6.如何在PPT里插视频文件，（主要是SWF格式的）？在标题栏里选择视图工具箱控件工具箱在出现的图表里选择其他控件SHOCK FLASH OBJECT 出现一个“ ”，你拖出一个视频窗口，然后双击它，在里面的MOVIE里粘上完整的路径：EG：F：/精武门.SWF 在embedmovie里

8、把false改成ture，其他的不改7.如何把百度里的视频变成可用的SWF文件插入到PPT中？选择你要的影片或者视频，让它缓冲完后，在INTERNET的工具栏internet选项设置找到文件把文件全删了，刷新后找到一个容量最大的文件，复制到你的电脑里就可以用了8.文字的动画效果？可以借助傻瓜软件FLAX制作，插入到PPT里去，或者用插入艺术字也可以，不过没那么美观9.利用PPT的触发器来制作做练习题？比如：奥运会在哪举行？A：北京 B：上海 C：天津你把ABC三个用不同的文本框打好字（不能用同一个文本框，不然没用）你把每个选项都添加一个效果：自定义动画添加效果飞入（自己选），然后出现一个下选框

9、，你选择记时然后设置为触发器就可以了，这样，你点A的时候就触发了“你的答案是正确的”的动作10.在幻灯片里加小图片如何设置为透明？在标题栏的视图工具箱图片，然后里面有只笔一样的东西，你用那只笔点击图片就可以了11.如何在一个PPT里用多种模板？新建然后在右边的模板里选择，会出现一个先拉的选项似的东西，你选择应用于选定模板就可以了12，自己把文本框删除了，又要打字该怎么办？别忘了，PPT下面有很多工具，有花直线的，箭头的，文本框的，无填充色的，=，你直接点那个文本框再到幻灯片里画一个框就可以了13.如何把PPT作为网页一样阅读？标题栏里另存为然后选择存的格式是网页，则你的PPT就是一个网页了14，如何把别人PPT里的模板作为自己的图片？可以直接用他的PPT或者在视图母版把它的图片拷贝下来，就可以了，图片还可以用