Resource Macro not working with Pool

[Bill Johnson]

The following macro has worked well within the context of
a single, self-contained Project 2000 file for the past
several months:
***************
For Each r In ActiveProject.Resources

If r.Assignments.Count > 0 Then

do a bunch of stuff...

End If

Next r

MsgBox "Process Finished"
****************
Have just converted from a single, stand-alone file to
a "master" project containing multiple inserted Project
files and using a resource pool. When the macro is run
from the master file it bypasses the for loop and goes
straight to the message box.

I do not have the experience and VBA expertise yet to
recognize what is wrong. I've been looking in the VBA
help and a VBA6 reference book, but have not found
anything useful. Can anyone offer a reason/solution?
Thanks in advance.

Bill

 

[Gérard Ducouret]

Hello Bill,

Does the "ActiveProject" (Your master project) share the resources pool ?

Gérard Ducouret

 

[Bill Johnson]

That was it. Thanks a lot for your help.

Bill

-----Original Message-----
Hello Bill,

Does the "ActiveProject" (Your master project) share the resources pool ?

Gérard Ducouret

"Bill Johnson" <[email protected]> a écrit dans le message
de news: [email protected]...


.