Anybody ever seen this report

J

John Sitka

I have a request for a resource usage "non date" referenced assignment report(chart)


That is, sequence only, no dates just task name and order on a single line per resource.

Resource1---Task1.1---Task1.2---Task1.3
Resource2---Task2.1---Task2.2---Task2.3---Task2.4
Resource3---Task3.1---Task3.2

Thanks.
 
J

John Sitka

Here is a macro to do it....

Sub whiteboard()
Dim Ta As Task
Dim TaS As Tasks
Dim A As Assignment
Dim Re As Resource
Dim ReS As Resources
Set TaS = ActiveProject.Tasks
Set ReS = ActiveProject.Resources

Dim aline As String

sname = "C:\whiteboard.csv"
Open sname For Output As #1

For Each Re In ReS
aline = Re.Name & " , "

For Each Ta In TaS
If Not Ta Is Nothing Then
For Each A In Ta.Assignments
If Not A Is Nothing Then
If (Re.Name = A.ResourceName) And (A.RemainingWork > 0) Then
aline = aline + (" - " & A.TaskName & " (" & A.TaskID & "),")
End If
End If
Next A
End If
Next Ta

Print #1, aline
aline = ""
Next Re

Close #1
End Sub
 
G

Gary L. Chefetz [MVP]

John:

Since you're reporting on only one project, you could simply apply grouping
by resource to a project view that exposes the fields you want. The path to
Excel is easy enough.




John Sitka said:
Here is a macro to do it....

Sub whiteboard()
Dim Ta As Task
Dim TaS As Tasks
Dim A As Assignment
Dim Re As Resource
Dim ReS As Resources
Set TaS = ActiveProject.Tasks
Set ReS = ActiveProject.Resources

Dim aline As String

sname = "C:\whiteboard.csv"
Open sname For Output As #1

For Each Re In ReS
aline = Re.Name & " , "

For Each Ta In TaS
If Not Ta Is Nothing Then
For Each A In Ta.Assignments
If Not A Is Nothing Then
If (Re.Name = A.ResourceName) And (A.RemainingWork > 0)
Then
aline = aline + (" - " & A.TaskName & " (" &
A.TaskID & "),")
End If
End If
Next A
End If
Next Ta

Print #1, aline
aline = ""
Next Re

Close #1
End Sub
 
J

John Sitka

Thanks,

I still need the display to be, single line per resource, each task one cell long
and the tasks on a single line that represent the sequence

Resource1 T1 T2 T4 T3
means
Resource1 works on T1 then T2 then T4 then T3

Resource2 T9 T4 T7 T5
means
Resource2 works on T9 then T4 then T7 then T5


the final report is......
Resource1 T1 T2 T4 T3
Resource2 T9 T4 T7 T5

picture a grid like an in/out board but with no days of the week along the top
the axis along the top is just a task order (event slots)

I see how a visual representation like this

Resource1 T1
-----Resource1 T2
----------Resource1 T4
---------------Resource1 T3

is EXACTLY the same information but upon suggestion, no one would believe me.
I didn't want to argue that fact so I built the macro.

Still, if I'm missing how a grouping could show the "final report is......" I would definitely like to learn.







Gary L. Chefetz said:
John:

Since you're reporting on only one project, you could simply apply grouping by resource to a project view that exposes the fields
you want. The path to Excel is easy enough.
 
G

Gary L. Chefetz [MVP]

John:

Grouping would give you the data but it can't transform it to the specific
presentation you're looking for.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top