I have the following code which should, when I open my template, run the Auto_Open commande in the Add In called Milbank Template.pot, but it isn't working. Basically I want the Milbank Template.ppa to run when this particular template is open. What it was doing is run everytime I opened PowerPoint, therefore disabling the Insert menu for all presentations, not just those run from the template. This is the code I have that should now disable the Add Ins and only load the Add Ins for the template if it is opened from the template, but it is not working.

This is the code I have so far:

[VBA]

AddIns.Remove ("Milbank Template.ppa")
AddIns.Remove ("Normal.ppa")
If Application.ActivePresentation.TemplateName = "Milbank Template.Pot" Then
Set myAddIn = Application.AddIns.Add(FileName:="D:\Documents and Settings\abrown3\Application Data\Microsoft\AddIns\Milbank Template.ppa")
myAddIn.Loaded = True
Else
Set myAddIn = Application.AddIns.Add(FileName:="D:\Documents and Settings\abrown3\Application Data\Microsoft\AddIns\Normal.ppa")
myAddIn.Loaded = True
End If

Call Delete

Dim oToolbar As CommandBar

Dim oButton As CommandBarButton


Dim MyToolbar As String
' toolbar name
MyToolbar = "Milbank"
.....

[/VBA]

Can anyone throw any light on what I might be doing wrong. Normal.ppa is just a normal blank presentation with no code etc.

Thanks

Annette