CustomFieldProperties

[Richard Trappen]

Mates,

I'm working on a VBA automation project for MSP2K in which I need to
identify programmatically if a custom field has been customized. I have
figured out if an alias, formula, or a value-list has been assigned but
I'm running into a brick wall when it comes to the graphical
indicators. All I need to know if a graphical indicator has been
assigned to a custom field in order to utilize the organizer to transfer
it to a comparison program. Appreciate any ideas or pointers on this...

Cheers!

Rick

 

[Guest]

I don't have an answer to your question straight away just
yet, but was wondering if you've had any luck getting to
and listing the ContraintType values and/or OutLineCode1?
Any help is appreciated.

 

[Richard Trappen]

Regarding your question on ConstraintType values, these are accessible
via code. There are
eight values (0 - 7) and they break out as follows: (applicable to
Project 2000...not sure on other flavors)

0 - As Soon As Possible
1 - As Late As Possible
2 - Must Start On
3 - Must Finish On
4 - Start No Earlier Than
5 - Start No Later Than
6 - Finish No Earlier Than
7 - Finish No Later Than

To list an individual task constraint type use this line of code:

debug.print Activeproject.Tasks(n).ConstraintType
- This will print the value in your immediate window...the (n) is the
index value that you need to insert for the task
in question.

To list them all, just use a For..Next loop along with a counter to go
through all of the tasks in the project.

Dim T As Task
For Each T In ActiveProject.Tasks
Debug.Print T.ConstraintType
Next

- This will loop through all tasks and print the constrainttype value
in the debug window

Not sure what your trying to accomplish but the above info and examples
should get you going. As for the
OutlineCode1 question, I don't have an answer for you. I don't have a
requirement for it thus I've not researched it.

Cheers!

Rick