通过

项目对象 (Project)

  • 项目

包含的 项目 对象的集合。

示例

使用 Project 对象

使用 项目 （索引） 的索引所在的项目索引编号或项目名称，返回一个 项目 对象。 下面的示例在所有打开的项目之间切换，全名的每一个，然后显示结果。

Dim Temp As Long, Names As String 

 

For Temp = 1 To Projects.Count 

 Projects(Temp).Activate 

 Names = Names & Projects(Temp).FullName & vbCrLf 

Next Temp 

 

MsgBox Names

使用 Projects 集合

使用 项目 属性可返回的 项目 集合。 下面的示例对打开的项目数进行计数。

Application.Projects.Count

因为 Projects 集合是顶级对象，因此下面的示例在功能上等同于上面的代码。

Projects.Count

使用 Add 方法可以将 Project 对象添加到 Projects 集合中。 以下示例将新建一个项目，但不提示项目信息。

Projects.Add False

方法

名称
Add
CanCheckOut
CheckOut

属性

名称
Application
Count
项目
Parent

另请参阅

项目对象模型

支持和反馈

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