PdcProjects.Active

Declaration

Active as PdcProject

Notes

This property returns the active project.

Code example

This example code returns the projectnumber of the active project.

dim objProject

  set objProject = pdc.Projects.Active
  if IsValid(objProject) then
    msgbox objProject.ProjectNumber
  else
    msgbox "There is no active project."
  end if

Availability

Available since February 2011 (From version 4.2 onwards).