Enterprise fields and VBA

[Sean]

I'm trying to manipulate the enterprise task outlinecode1's lookup table
using VBA. The below code allows manipulation of standard outlinecode1, but
I can't seem to find the similiar code for the enterprise fields.

Set objlookup = ActiveProject.OutlineCodes(1).LookupTable

 

[Ed Morrison]

Make sure your ActiveProject is the Enterprise Global and your code should
work.

 

[Sean]

I've finally returned to this problem. How can I make the enterprise global
the active project?

 

[Ed Morrison]

You have to open it. Manually, its Tools, Enterprise Options, Open
Enterprise Global. In VBA its simply EnterpriseGlobalCheckOut.

You should back up the Enterprise Global before changing it. Prior to
opening it - Tools, Enterprise Options, Backup Enterprise Global... or
FileSaveAs Name:="filelocation\EntGlobalBackUpyyyymmdd.mpt", Format:=pjMPT,
FormatID:="MSProject.MPT" in VBA (where yyyymmdd is the year-month-day so
you don't overwrite the old file.

--
Ed Morrison
msProjectExperts
"We wrote the books on Project Server"
http://www.msprojectexperts.com
FAQ - http://www.projectserverexperts.com