Bulk Upload of task work

[Steve Scott]

I have approx 2000 tasks which are all 3months fixed duration. I need to be
able to assign monthly work eg 10 days in Oct; 5 days in Nov, 2 Days in Dec.
I have the monthly work data in a spreadsheet/access db. How can I
automatically upload the work spread rather than just allowing project to
spread the 17 days across the 3months itself? I cannot go into each task and
do this manually as it would take forever.

Thanks

 

[Jan De Messemaeker]

Hi,

There may be other possibilities but I know it is doable in VBA.
If you are interested in that solution I could point you to the relevant
objects.
HTH

 

[Steve Scott]

Yes please,

Hi,

There may be other possibilities but I know it is doable in VBA.
If you are interested in that solution I could point you to the relevant
objects.
HTH

--
Jan De Messemaeker
Microsoft Project Most Valuable Professional
http://users.online.be/prom-ade/
+32-495-300 620

 

[Jan De Messemaeker]

Hi,

to get you started, to call Project from another application

Dim PjApp as MSproject.application
set Pjapp=createobject ("MSProject.application")

To open the .mpp file
pjapp.fileopen ... (see the help in the object browser)

To locate the task (I suppose you have the name)
Dim AJob as task
set ajob = activeproject.tasks("The task name")

If you have to locate the task based on an other field you can use the Find
method or loop through the tasks

For each ajob in activeproject.tasks
if not ajob is nothing then

......compare data to check whether it is this task
exit for

end if
nxt ajob

Finally, now comes the tricky part.
You will have to look up, and understand, the TimeScaleValues object and the
TimeScaledata method; you will see that it allows you to defien the monthly
values and you can then import them.

Hope this helps,