How to update actual work column in MS-project using VB macro

S

sripri96

Hi:

Is there any other way to update actual work column for each resource in
each task using VB macro in project?

Thanks,
sripri96
 
J

John

sripri96 said:
Hi:

Is there any other way to update actual work column for each resource in
each task using VB macro in project?

Thanks,
sripri96
Click to expand...

sripri96,
Well, yes, you can do it manually in either the Resource or Task Usage
views. Or, you can update the Project database directly (to learn more
about that look for the projdb.htm file on your hard drive).

John
Project MVP
 
G

Gilgamesh

sripri96 said:
Hi:

Is there any other way to update actual work column for each resource in
each task using VB macro in project?
Click to expand...

Yes.
For each resource you need to loop through their assignments object and do
the update.
My copy of project is on my work PC so I'm working from memory on this code
so it may be (probably is) wrong.

Dim oResource as Resource
Dim oAssign as Assignment

For each oResource in ActiveProject.Resources
For Each oAssign in oResource.Assignments
oAssign,ActualWork = "whatever value you decide to enter here"
Next oAssign
Next oResource
 
Top