problems accessing BaseLine Work thru VBA in Microsoft Project Server

[Jakub Skopal]

Hello Everybody,

We're trying to customize Microsoft Office Project 2003 application with
VBA macros. Our macro needs to update BaseLine work associated with a
Resource for each day/month/year. The macro now contains code, which can
be summarized as:

ActiveProject.Resources.UniqueID(1).TimeScaledData( _
StartDate:="31.10. 2005 0:00", _
EndDate:="1.11. 2005 0:00", _
Type:=pjResourceTimescaledBaselineWork, _
TimeScaleUnit:=4, _
Count:=1).Item(1).Value = 120

which should effectivelly set value into "31 oct 2005" cell of baseline
work to "2hours". The trouble is, that it does not set the value when
the respective resource is taken from Enterprise Resource Pool. We can
check, that the value is _somewhere_ by:

MsgBox ActiveProject.Resources.UniqueID(1).TimeScaledData( _
StartDate:="31.10.2005 0:00", _
EndDate:="1.11. 2005 0:00", _
Type:=pjResourceTimescaledBaselineWork, _
TimeScaleUnit:=4, _
Count:=1).Item(1).Value

which prints back "120". But it is not visible in the GUI. Viceversa, if
I set a value of baselinework via GUI, I cannot access it via script.

Is there a solution to this, please?

thank you in advance,
Jakub Skopal

p.s. Please forward your replies to my mail address as well. Thank you.