东坡下载:内容最丰富最安全的下载站!

首页IT技术软件教程 → 快速批量设置PowerPoint字体及行间距的宏源码

快速批量设置PowerPoint字体及行间距的宏源码

相关文章发表评论 来源:本站整理时间:2014/10/31 18:02:09字体大小:A-A+

更多

作者:专题点击:790次评论:0次标签: PowerPoint

如果几页ppt文档处理起来很快,但是如果上了50页,改个东西还真是不容易,特别是上了几百页的话那,简直就死机了,这里给您提供一个快速批量设置PowerPoint字体及行间距的宏源码。

Sub ChangeTextFont()

Set pages = ActivePresentation.Slides.Range

pageCount = pages.Count


'第一页和最后一页跳过

For i = 2 To pageCount - 1

DoEvents

ActiveWindow.View.GotoSlide Index:=i

shapeCount = ActiveWindow.Selection.SlideRange.Shapes.Count


For j = 1 To shapeCount

ActiveWindow.Selection.SlideRange.Shapes(j).Select

shapeType = ActiveWindow.Selection.SlideRange.Shapes(j).Type


'1  - 自选图形

'7  - 公式

'13 - 图片

'14 - 占位符

'15 - 艺术字

'17 - 文本框

'19 - 表格

'Debug.Print shapeType

Select Case shapeType

Case 1, 14, 17

Set txtRange = ActiveWindow.Selection.ShapeRange.TextFrame.TextRange

txtRange.Select


If txtRange.Text <> "" Then

'设置字体为宋体, 24号

With txtRange.Font

.Name = "宋体"

.Size = 24

End With


'设置段落格式为1.3倍行距

With txtRange.ParagraphFormat

.SpaceWithin = 1.3

End With

End If

Case 7, 13, 15

Case 19

End Select

Next j

Next i

End Sub


  • 生日ppt模板大全
  • 国庆班会ppt模板大全
  • powerpoint
  • ppt办公软件
生日ppt模板大全
(9)生日ppt模板大全

在我国除了春节、元旦、五一、端午、中秋、国庆这些国家法定节日外还有许多节日比如感恩节、教师节、情人节、儿童节等等,节日也意味着人们寓意着好的向往,小编给大家带来了庆典ppt模板大全,各种庆典ppt模板都有。有需要可点击下载。

...更多>>
国庆班会ppt模板大全
(6)国庆班会ppt模板大全

在我们学生时代,开班会都是非常常见的事情,各个主题班会层出不穷。国庆放假前期,每个班级也会举行以国庆节为主题的班会,为了老师更好的举行班会活动,小编为大家带来了教师ppt模板大全,该模板适用于教育教学,小学初中高中PPT教学模板皆可运用,直接下载即可使用。可以根据自身需要进行下载。

...更多>>
powerpoint
(5)powerpoint

PPT就是powerpoint,这里给大家提供的是最新最全的powerpoint版本,包括各种模板ppt下载免费完整版,ppt下载官方下载利用Power Point制作的文稿,可以通过不同的方式播放,也可将演示文稿打印成一页一页的幻灯片,使用幻灯片机或投影仪播放,可以将演示文稿保存到光盘中以进行分发,并可在幻灯片放映过程中播放音频流或视频流。对用户界面进行了改进并增强了对智能标记的支持,可以更加便捷地查看和创建高品质的演示文稿。

...更多>>
ppt办公软件
(6)ppt办公软件

ppt软件在现在是很多的办公人员以及一些相关处理ppt的朋友都是需要下载的,那么ppt软件有哪些,或是ppt软件好用的都有哪几款了,这个就是很多的朋友都是想知道的,现在就赶快来试试看下面的这些是不是你需要的ppt软件吧!

...更多>>
更多精彩内容请点击

powerpoint

专题

扩展知识

相关评论

阅读本文后您有什么感想? 已有 人给出评价!

  • 2791 喜欢喜欢
  • 2101 顶
  • 800 难过难过
  • 1219 囧
  • 4049 围观围观
  • 5602 无聊无聊
热门评论
最新评论
昵称:
表情: 高兴 可 汗 我不要 害羞 好 下下下 送花 屎 亲亲
字数: 0/500 (您的评论需要经过审核才能显示)

本类常用软件