Dzwebs.Net

撰写电脑技术杂文十余年

PrintRange对象、PrintRanges集合对象的用法与关联

Admin | 2013-7-11 8:06:27 | 被阅次数 | 6111

温馨提示!

如果未能解决您的问题,请点击搜索;登陆可复制文章,点击登陆

  一、PrintRange 对象

  代表要打印的连续幻灯片或页的范围。PrintRange 对象是 PrintRanges 集合的元素。PrintRanges 集合包含为指定演示文稿定义的所有打印区域。

  使用 PrintRange 对象

  使用 Ranges(index) 返回单个 PrintRange 对象,其中 index 是打印区域索引号。以下示例显示一条消息,指示当前演示文稿第一个打印区域的起始和终止幻灯片编号。

  With ActivePresentation.PrintOptions.Ranges
      If .Count > 0 Then
          With .Item(1)
              MsgBox "Print range 1 starts on slide " & .Start & _
                  " and ends on slide " & .End
          End With
      End If
  End With

  使用 Add 方法创建 PrintRange 对象,并添加到 PrintRanges 集合中。以下示例定义三个打印区域,分别代表当前演示文稿中第一张幻灯片,第三到第五张幻灯片,第八和第九张幻灯片;然后打印这些区域中的幻灯片。

  With ActivePresentation.PrintOptions
      .RangeType = ppPrintSlideRange
      With .Ranges
          .ClearAll
          .Add 1, 1
          .Add 3, 5
          .Add 8, 9
   End With
  End With
  ActivePresentation.PrintOut

  注意:可以在 PrintRanges 集合中设置独立于 RangeType 设置的打印区域。这些打印区域在包含它们的演示文稿加载时始终有效。RangeType 属性设为 ppPrintSlideRange 时,应用 PrintRanges 集合中的区域。

  二、PrintRanges 集合对象

  指定演示文稿中所有 PrintRange 对象的集合。每个 PrintRange 对象代表要打印的连续幻灯片或页的范围。

  使用 PrintRanges 集合

  使用 Ranges 属性返回 PrintRanges 集合。以下示例从当前演示文稿的集合中清除所有以前定义的打印区域。

  ActivePresentation.PrintOptions.Ranges.ClearAll

  使用 Add 方法创建 PrintRange 对象,并添加到 PrintRanges 集合中。以下示例定义三个打印区域,分别代表当前演示文稿中第一张幻灯片,第三到第五张幻灯片,第八和第九张幻灯片;然后打印这些区域中的幻灯片。

  With ActivePresentation.PrintOptions
      .RangeType = ppPrintSlideRange
      With .Ranges
          .ClearAll
          .Add 1, 1
          .Add 3, 5
          .Add 8, 9
      End With
  End With
  ActivePresentation.PrintOut

  使用 Ranges(index) 返回单个 PrintRange 对象,其中 index 是打印区域索引号。以下示例显示一条消息,指示当前演示文稿第一个打印区域的起始和终止幻灯片编号。

  With ActivePresentation.PrintOptions.Ranges
      If .Count > 0 Then
          With .Item(1)
              MsgBox "Print range 1 starts on slide " & .Start & _
                  " and ends on slide " & .End
          End With
      End If
  End With


该杂文来自: PowerPoint杂文

上一篇:office助手的操作

下一篇:PropertyEffect 对象在VBA中的应用

网站备案号:

网站备案号:滇ICP备11001339号-7

版权属性:

Copyright 2007-2021-forever Inc. all Rights Reserved.

联系方式:

Email:dzwebs@126.com QQ:83539231 访问统计