调整PPT文字段落中的行间距,可以改善PPT的美观效果。那么,PPT的行间距该如何调整呢?如果PPT内只有一两行文字,我们可以通过行间距命令来完成,但如果几百张PPT,都需要调整行间距,那么使用VBA代码会更加明智快捷。
ppt行间距设置方法一:
选中需要调整的文字——单击菜单“格式”——“行距”命令。打开行距对话框,按需设置行间距就OK。
ppt行间距设置方法二:
PPT中添加项目符号的三种方法
项目符号就是放在文本(如列表中的项目)前以添加强调效果的点或其他符号。这个是PPT制作时最常用的一个符号了。在并列要点上加项目符号,通常有三种方式。本文就分别举例说明PPT制作时添加项目符号的方法。 1、选中文字,直接选择项目符号。如下图。这是最常用的方式,页面效果一般。 2、选中文字,选择项目符号,然后选择图片项目
ppt行间距也可以通过组合键来打开行距对话框,ALT O S。
ppt行间距设置方法三:
如果是好几百张PPT就使用下面的代码完成。按下ALT F11,打开VBE对话框,单击插入——模块,复制下面的代码,按F5键运行就可以完成PPT行间距设置。
Sub ChangeTextFont()Set pages = ActivePresentation.Slides.RangepageCount = pages.Count'第一页和最后一页跳过For i = 2 To pageCount – 1DoEventsActiveWindow.View.GotoSlide Index:=ishapeCount = ActiveWindow.Selection.SlideRange.Shapes.CountFor j = 1 To shapeCountActiveWindow.Selection.SlideRange.Shapes(j).SelectshapeType = ActiveWindow.Selection.SlideRange.Shapes(j).Type'1 – 自选图形'7 – 公式'13 – 图片'14 – 占位符'15 – 艺术字'17 – 文本框'19 – 表格'Debug.Print shapeTypeSelect Case shapeTypeCase 1, 14, 17Set txtRange = ActiveWindow.Selection.ShapeRange.TextFrame.TextRangetxtRange.SelectIf txtRange.Text <> "" Then'设置字体为宋体, 24号With txtRange.Font.Name = "宋体".Size = 24End With'设置段落格式为1.3倍行距With txtRange.ParagraphFormat.SpaceWithin = 1.3End WithEnd IfCase 7, 13, 15Case 19End SelectNext jNext iEnd Sub
如何给PPT幻灯片加密?PPT各版本加密方法
在办公时,我们常常会用PPT幻灯片制作报告文件、设计方案、年会总结等,这些幻灯片中含有极为重要的数据信息,如有泄露,会对公司及个人造成很大的威胁和损失。所以说,给PPT演示文稿加密成了重中之重的事情,丝毫不能马虎大意。那么到底如何给PPT幻灯片加密呢?下面就来详细介绍下PPT2003、PPT2007、PPT2010多个