Assignment Days on Gantt Chart

[MrC]

Is it possible to show the assignment days for each resource on a Gantt
Chart. Right now I can see the resources assigned and percentage if not
100%.

Thanks....

 

[Mike Glen]

No, sorry

Mike Glen
Project MVP

 

[John]

MrC,
On the surface Mike's answer is correct, however there is generally
always a way to do something, maybe not exactly what you want, but often
close enough. First, what exactly do you mean by "assignment days"? Any
of the spare fields (e.g. Text1, Number1, etc.) can be displayed in or
around a Gantt bar. So, if there are only a small number of resources
(one is best) assigned to the task, whatever you are defining as
assignment days can probably be displayed on the Gantt. The value in the
spare field may be able to be defined using a formula or if that doesn't
work, VBA is always an option.

Hope this helps.
John

 

[MrC]

Thanks for the reply John. I have 1 to 3 resources assigned to each
task. What I'd like to display might be "Fred(3d) Mary(4d)".

Can you help ????

 

[John]

MrC,
Yes, of course, that's what we are here for. However help me out by
answering my previous question, what exactly do you mean by "assignment
days"? Is it simply the work hours for each resource on a given task
expressed in days instead of hours, or something else?

John

 

[MrC]

Yes, thats what I mean. On my previous example Fred was assigned 3 days
and Mary 4 days on a particular task. Right now if the task was 5 days
in duration then the assignment column would read Fred(60%) Mary(80%)

Thanks for your help....

 

[John]

MrC,
It might be possible to do this with a custom field but for me it's not
worth the trouble to try and figure it out. It is much easier to use
VBA. The following code will set up the spare field, Text30 with the
info you want (make sure Text30 has no other information). It is then
just a simple matter of going to Format/Bar Styles and for the normal
task bar style, select the "text" tab in the lower half of the Bar
styles window. Enter "text30" in whichever position in or around the bar
you want the information to appear.

Sub ResAssDays()
For Each t In ActiveProject.Tasks
If Not t Is Nothing Then
For Each A In t.Assignments
i = 0: Delim = ""
If t.Assignments.Count > 1 And i < t.Assignments.Count Then
Delim = ","
t.Text30 = t.Text30 & A.ResourceName & "(" & A.Work / 480 &
"d)" & Delim
Delim = ""
Next A
End If
Next t
End Sub

Hope this helps.
John

 

[MrC]

Thanks again, I'll give it a try....