Activate project for the first time by using VBA

[uw]

Hello.

I would like to activate a project file (*.ipj) by using VBA.

It is no problem to switch to a project I have allready used:

_______________________________________________

Public Sub ChangeProject()

    Dim oDesignProjectMgr As DesignProjectManager
    Set oDesignProjectMgr = ThisApplication.DesignProjectManager
    Dim oProject As DesignProject
    Set oProject = oDesignProjectMgr.DesignProjects.ItemByName("NewProjectName")
        oProject.Activate

End Sub

_______________________________________________

But how can I activate a new Project I have copied to my harddisk, renamed and never used before.

For example I want to set

        C:\tmp\NewestProject\NewestProject.ipj

as my active project?

Regards

 Reinhard

[marcin_otręba · Accepted solution]

Try:

Set oProject = oDesignProjectMgr.DesignProjects.AddExisting

[uw]

Thank you very, very much!!!

It works perfectly!

Regards

 Reinhard