Automate the Tools...Reference ?
 

I have created an Add-in and successfully used it in one workbook.
Now I am trying to write some code to automatically get the xla file from
the network, add it to the Excel Addins - which I can do. Apparently to
actually have each new Workbook recognize and use it however, I also need to
MANUALLY go into Tools...References and check it.

How can I do this in VBA code so the user doesn't have to?

Here is what I use to get it to show up as an add-in:

Private Sub Workbook_Open()

'Application.AddIns("ScopingTool_Addin").Installed = False
Set myAddIn =
Application.AddIns.Add(Filename:="H:\Current\Scopi ngTool_Addin.xlam",
CopyFile:=False)
Application.AddIns("ScopingTool_Addin").Installed = True

End Sub

Automate the Tools...Reference ?
 

I asked a similar question:

http://groups.google.com/group/micro...8d859c231fb626


--
Gary''s Student - gsnu200812


"chemicals" wrote:

I have created an Add-in and successfully used it in one workbook.
Now I am trying to write some code to automatically get the xla file from
the network, add it to the Excel Addins - which I can do. Apparently to
actually have each new Workbook recognize and use it however, I also need to
MANUALLY go into Tools...References and check it.

How can I do this in VBA code so the user doesn't have to?

Here is what I use to get it to show up as an add-in:

Private Sub Workbook_Open()

'Application.AddIns("ScopingTool_Addin").Installed = False
Set myAddIn =
Application.AddIns.Add(Filename:="H:\Current\Scopi ngTool_Addin.xlam",
CopyFile:=False)
Application.AddIns("ScopingTool_Addin").Installed = True

End Sub