1 Colour for 1 Resources (right place to ask!)

[Smax]

Hi,
I think that I have post that question on the wrong
newsgroup before so I post here I am sure it is the right
place.
Is it possible to assign one colour per one resource?
I would like to use MS Project to manage the use of
resources (lets say car for example) and to have a easy
view of the use and appropiration of the resources I would
like ot assign one colour by default to one resource
car 1 -> red
car 2 -> blue
car 3 -> green
.....

Anyone can help me

Thks.

 

[Jan De Messemaeker]

Hi,

I suppose you have only one resource per task, you probably wouldn't ask the
question if not
I also suppose you have fewer than 20 resources (more than 20 colors would
not be very efficient I think)

So:
Put a formula in Flag1 so that it is true if the resource name is Car1
Put a formula in Flag2 so that it is true if the resource name is Car2

Etcetera

Now in Format, Bar Styles, define the number of styles (colors) necessary
and in Show For... enter Falg1 ro Flag2, etc.
HTH

--
Jan De Messemaeker
Microsoft Project Most Valuable Professional
Project Management Consultancy
Prom+ade BVBA
32-495-300 620

 

[Smax]

Yeap I can only have 1 resource per task.

How do you manage to put do that? I am working on MS
Project 98

Thanks

 

[Jan De Messemaeker]

Hi Smax,

Well, that IS a problem because the process I described uses formulae in
custom fields, and that feature was introduced in P2000!
In Project 98 the only way is through a VBA macro and then you will need
some coding skills.

Supposing you know what I'm talking about, such a program would look about
like this (say I have 11 resource names)

sub ResoColors

for each job in activeproject.tasks
if not job is nothing then
if not job.summary then
job.flag1=(job.resourcenames="Name of R1")
job.flag2=(job.resourcenames="Name of R2")
job.flag3=(job.resourcenames="Name of R3")
job.flag4=(job.resourcenames="Name of R4")
job.flag5=(job.resourcenames="Name of R5")
....
job.flag11=(job.resourcenames="Name of R11")
end if
end if
next
end sub

You run this and as said in my first mail, create the bar styles.

HTH

 

[Smax]

I think I have been able to do the first part of your
fisrt mail:

In the resource sheet I have assigned for each resource a
flag (1 to 13) with a Yes for each.
If it is what you told me to do lets continue, my proble
is on the second part in the bar style.

How do you 'define the number of styles (colors) necessary
and show for... enter flag1...'

I see the field show for... but do I have to insert 13
row? and if so what do I have to enter for each row (give
one ex because the rest will be the same)

thks

 

[Jan De Messemaeker]

Hello

I'm afraid my message did not come across.
You definitely should not touch the resource.flag fields, they have nothing
to do with this.
The idea was to use a VBA macro to set the task.flag fields as a function of
the resource.

As for the Bar Styles, yes you need 13 lines, one for each color (how else
could you define 13 colors?)
Each style has one of the 13 flag fields in show for...

Select your appearance

From should read Start
To should read Finish

The whole trick now is to have the right Task Flag field set to yes as a
function of the resource
That is not extremely difficult in P2000, but in P98 you either need VBA or
dynamic links to Excel.

Greetings,


--
Jan De Messemaeker
Microsoft Project Most Valuable Professional
Project Management Consultancy
Prom+ade BVBA
32-495-300 620