Microsoft KB Archive/280290

= How to install an Excel Add-in (XLA or XLL) with Automation =

Article ID: 280290

Article Last Modified on 6/10/2005

-

APPLIES TO


 * Microsoft Office Excel 2003
 * Microsoft Excel 2002 Standard Edition
 * Microsoft Excel 2000 Standard Edition
 * Microsoft Excel 97 Standard Edition
 * Microsoft Visual Basic 6.0 Professional Edition
 * Microsoft Visual Basic 6.0 Enterprise Edition

-



This article was previously published under Q280290



SUMMARY
This article illustrates how to install an Excel Add-in (xla or xll) with Automation.



MORE INFORMATION
The following code demonstrates how to use Automation to:  Add a new workbook. Call the Add method of the AddIns collection to add the new add-in to the list of add-ins in Excel Add-In Manager.  Set the Install property of the AddIn object to True (equivalent to selecting the add-in the Add-in Manager). Dim oXL As Object, oAddin As Object Set oXL = CreateObject(&quot;Excel.Application&quot;) oXL.Workbooks.Add Set oAddin = oXL.AddIns.Add(&quot;C:\test.xla&quot;, True) oAddin.Installed = True oXL.Quit Set oXL = Nothing Note that a workbook is added prior to calling the Add method in this example. The Add-in Manager in Excel is not available unless there is at least one visible workbook open. Without this line of code, you receive one of the following error messages:

Run-time error '1004':

Unable to get the Add property of the AddIns class

-or-

Run-time error '1004':

Add method of addins class failed.



