You can use the ProjectType property to determine the type of project that is currently open through the CurrentProject or CodeProject objects. Read-only AcProjectType.
AcProjectType can be one of these AcProjectType constants. |
acADP |
acMDB |
acNull |
expression.ProjectType
expression Required. An expression that returns one of the objects in the Applies To list.
The ProjectType property is available only by using Visual Basic.
The following example displays a message with details about the type of project that is currently open.
Dim intProjType As Integer
intProjType = Application.CurrentProject.ProjectType
Select Case intProjType
Case 0 ' acNull
MsgBox "ProjectType is acNull"
Case 1 ' acADP
MsgBox "ProjectType is acADP"
Case 2 ' acMDB
MsgBox "ProjectType is acMDB"
Case Else
MsgBox "Can't determine ProjectType"
End Select