Follow up on Custom Toolbar

[PhxProjectUser]

Helloo, I got my code right, but it won't activate upon opening. I show that
on project open, the code should start, but nothing happens. I already
reduced the security level for the macro.
Please help.
Thanks.

p.s. here's my code:
Private Sub Project_Open(ByVal pj As Project)
On Error Resume Next
OrganizerDeleteItem Type:=pjToolbars, FileName:="GLOBAL.mpt", Name:="AO Red"
OrganizerMoveItem Type:=pjToolbars,
FileName:=ActiveProject.AO_Redesign_Overall_Project_Plan, Name:="AO Red",
tofilename:="GLOBAL.mpt"
End Sub


Hi,

Open the distributing file
Alt+F11
In the upper left partial window open (+ sign) the name of the Project
Double-Click "This Project"
In the upcoming code window paste the macro I've published
Save the distributing file
Anyone who opens it will now have the toolbar in his/her global.
HTH

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

My original question was: I need to disburse a custom toolbar to my project
team. I know that my team members have to move it to *their* Global.mpt file.
Is there a simple macro anyone has that I can send to my team to run?

I rec'd the following answer:
enter the following code into the ThisProject module of
the distributing file:

Private Sub Project_Open(ByVal pj As Project)
On error resume next
OrganizerDeleteItem Type:=pjToolbars, FileName:="GLOBAL.mpt", Name:="What A
Bar"
OrganizerMoveItem Type:=pjToolbars, FileName:=activeproject.FullName,
Name:="What A Bar", tofilename:="GLOBAL.mpt"
end sub

MY NEW QUESTION IS:
My file is a read-only. Will this still work? Also, you mention
entering the following code into the ThisProject module of the distributing
file. Please provide more information on how to do this.

Was this post helpful to you?

Why should I rate a post?



Expand AllCollapse All

Manage Your Profile |Contact us
© 2005 Microsoft Corporation. All rights reserved. Terms of Use |Trademarks
|Privacy Statement

 

[Jan De Messemaeker]

Hi,

If you first change the macro, no wonder it doesn't work.
activeproject.fullname is to be coded as such!!