通过

从集合中返回对象

  • 项目

Item 方法可以从集合中返回单独的对象。 以下示例将 firstPres 变量设置为 一个 Presentation 对象，该对象代表演示文稿 一个变量，一个 Presentation 对象表示一个演示文稿对象。

Set firstPres = Presentations.Item(1)

Item 方法是大多数集合的默认方法，因此可以通过省略 Item 关键字使相同的语句更为简练。

Set firstPres = Presentations(1)

有关指定集合的详细信息，请参阅该集合或其 Item 方法的帮助主题。

命名的对象

虽然通常可以使用 Item 方法指定整数值，但按名称返回对象可能更方便。 许多对象在创建时会提供自动生成的名称。 例如，你创建的第一张幻灯片将自动命名为“Slide1”。如果创建的前两个形状是矩形和椭圆，则其默认名称将为“矩形 1”和“椭圆 2”。 你可能希望为对象指定一个更有意义的名称，以便以后更易于引用。 命名对象最常用的方法是设置对象的 Name 属性。 以下示例在添加幻灯片时设置一个有意义的名称。 然后，可以使用名称而不是索引号来引用幻灯片。

ActivePresentation.Slides.Add(1, 1).Name = "Home Page Slide"
With ActivePresentation.Slides("Home Page Slide")
    .FollowMasterBackground = False
    .Background.Fill.PresetGradient _
        msoGradientDiagonalDown, 1, msoGradientBrass
End With

预定义的索引值

有些集合有预定义的索引值，可用于返回单个对象。 每一个预定义索引值用一个常量表示。 例如，使用 TextStyles 集合的 Item 方法指定 PpTextStyleType 常量以返回单个文本样式。

以下示例设置当前演示文稿中幻灯片的正文区域的边距。

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

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。