大众计算机学习网欢迎诸位!收藏本站注 册登 陆
常用教程:基础知识网络知识操作系统WPS网页制作数据库算法网页成功之路网络安全最新技术古典mid流行midmid背景下载中心
您现在的位置:首页 > 教程 > 文章页

TextStyle文本样式、TextStyleLevel段落格式信息、大纲文本级别TextStyleLevels

Admin | 2013-9-30 17:29:40 | ReadNums | 2421 | 标签 PowerPoint教程 | 打印本页
     

  一、TextStyle 对象

  代表三种文本样式之一:标题文本、正文文本或默认文本。每种文本样式包含一个 TextFrame 对象,用以描述文本在文本边界框中的放置方式;一个 Ruler 对象,用以包含制表位和大纲缩进格式信息;一个 TextStyleLevels 集合,用以包含大纲文本格式信息。TextStyle 对象是 TextStyles 集合的成员。

  使用 TextStyle 对象

  使用 TextStyles(index) 返回单个 TextStyle 对象,其中 index 为 ppBodyStyle、ppDefaultStyle 或 ppTitleStyle。以下示例设置当前演示文稿中所有幻灯片第一级正文文本的字体名称和大小。

  With ActivePresentation.SlideMaster _
          .TextStyles(ppBodyStyle).Levels(1)
      With .Font
          .Name = "Arial"
          .Size = 36
      End With
  End With

  二、TextStyleLevel对象

  包含大纲级别的字符和段落格式信息。TextStyleLevel 对象是 TextStyleLevels 集合的成员。TextStyleLevels 集合包含所有五个大纲级别的 TextStyleLevel 对象。

  使用 TextStyleLevel 对象

  使用 Levels(index) 返回单个 TextStyleLevel 对象,其中 index 为 1 到 5 的数字,对应于五个大纲级别。以下示例为当前演示文稿的所有幻灯片设置字体名称和大小、段前空间、第一级正文文本的段落对齐。

  With ActivePresentation.SlideMaster _
          .TextStyles(ppBodyStyle).Levels(1)
      With .Font
          .Name = "Arial"
          .Size = 36
      End With
      With .ParagraphFormat
          .LineRuleBefore = False
          .SpaceBefore = 14
          .Alignment = ppAlignJustify
      End With
  End With

  三、TextStyleLevels集合对象

  所有大纲文本级别的集合。该集合总是包含五个成员,每个成员由一个 TextStyleLevel 对象代表。

  使用 TextStyleLevels 集合

  使用 Levels(index) 返回单个 TextStyleLevel 对象,其中 index 为 1 到 5 的数字,对应于五个大纲级别。以下示例为当前演示文稿的所有幻灯片设置第一级正文文本的字体名称和大小。

  With ActivePresentation.SlideMaster _
          .TextStyles(ppBodyStyle).Levels(1)
      With .Font
          .Name = "Arial"
          .Size = 36
      End With
  End With

  以下示例为当前演示文稿的所有备注页的备注正文区域的每个大纲级别文本设置字体大小。

  With ActivePresentation.NotesMaster.TextStyles(ppBodyStyle).Levels
      .Item(1).Font.Size = 34
      .Item(2).Font.Size = 30
      .Item(3).Font.Size = 25
      .Item(4).Font.Size = 20
      .Item(5).Font.Size = 15
  End With

  四、TextStyles集合对象

  标题文本、正文文本和默认文本  三个文本样式 的集合,其中每个文本样式由一个TextStyle 对象表示。每个文本样式包含一个描述文本在文本边框中的放置方式的 TextFrame 对象、一个包含制表位和大纲缩进格式信息的 Ruler 对象、一个包含大纲文本格式化信息的 TextStyleLevels 集合。

  使用 TextStyles 集合

  使用 TextStyles(index) 返回单个 TextStyle 对象,其中 index 为 ppBodyStyle、ppDefaultStyle 或 ppTitleStyle。本示例设置当前演示文稿所有备注页上备注正文区域的边距。

  With ActivePresentation.NotesMaster _
          .TextStyles(ppBodyStyle).TextFrame
      .MarginBottom = 50
      .MarginLeft = 50
      .MarginRight = 50
      .MarginTop = 50
  End With


问题未解决:在线咨询我要在线咨询问题

网友评论

(访客)
内容实用原创,讲得很好。
20xx年x月x日
(站长)
有问题请在线咨询。
20xx年x月x日