通过

Project Object

  • 项目
Project Developer Reference

Represents a project or all open projects. The Project object is a member of the Projects collection.

Using the Project Object

Use Projects(Index), where Index is the project index number or project name, to return a single Project object. The following example switches among all the open projects, memorizes the full name of each, and then displays the results.

  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

Using the Projects Collection

Use the Projects property to return a Projects collection. The following example counts the number of open projects.

  Application.Projects.Count

Because the Projects collection is a top-level object, the following example is functionally identical to the preceding one.

  Projects.Count

Use the Add method to add a Project object to the Projects collection. The following example creates a new project without prompting for project information.

  Projects.Add False

See Also