Lonnie - thanks for ideas.

Bob, very slick, brilliant use of code.

Thanks to you both. Rob

"Bob Phillips" wrote in message
...
How about simply

With Application.Addins("addin name")
.Installed = Not .Installed
End With

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Rob" wrote in message
...
Hi, Is it possible to use VAB to load an addin via clicking a custom
button
on the toolbar but if the addin is already loaded i.e. menu item showing,
unload the addin.

I tried the following without any luck other than it unloads the addin
but
does load it

Sub load myaddin()
if application.addins("addin name") is nothing then
addins("addin name").installed = true
Else
addins("addin name").installed = False
End if
End sub