Como creo un instalador para Complementos Excel?

Todo lo tienes en la ayuda cuestion de buscar no te parece :)
Crear tu macro para la instalacion de los complementos, no es dificil si ya
tienes definida la ruta de los addins que desarrollas.
La ayuda te dice todo, no hay razon para que no lograrlo ;)

Saludos

Objeto AddIn
Vea también Propiedades Métodos Eventos Específicos
Application
AddIns (AddIn)

Representa un solo complemento, tanto si está instalado como si no. El
objeto AddIn es un elemento del conjunto AddIns. El conjunto AddIns contiene
una lista de todos los complementos disponibles en Microsoft Excel,
independientemente de si están instalados. Esta lista corresponde a la lista
que se muestra en el cuadro de diálogo Complementos (menú Herramientas).

Uso del objeto Addin
Para devolver un solo objeto AddIn, use AddIns(índice), donde índice es el
título del complemento o su número de índice. El ejemplo siguiente instala
el complemento Analysis Toolpak.

AddIns("analysis toolpak").Installed = True
No confunda el título del complemento, que aparece en el cuadro de diálogo
Complementos, con su nombre, que es el nombre de archivo del complemento.
Debe escribir el título exacto del complemento, tal como se muestra en el
cuadro de diálogo Complementos, aunque no es necesario que coincidan las
letras mayúsculas y minúsculas.

El número de índice representa la posición del complemento en la lista del
cuadro Complementos disponibles del cuadro de diálogo Complementos. El
ejemplo siguiente crea una lista de propiedades específicas de los
complementos disponibles.

With Worksheets("sheet1")
.Rows(1).Font.Bold = True
.Range("a1:d1").Value = _
Array("Name", "Full Name", "Title", "Installed")
For i = 1 To AddIns.Count
.Cells(i + 1, 1) = AddIns(i).Name
.Cells(i + 1, 2) = AddIns(i).FullName
.Cells(i + 1, 3) = AddIns(i).Title
.Cells(i + 1, 4) = AddIns(i).Installed
Next
.Range("a1").CurrentRegion.Columns.AutoFit
End With
Comentarios
El método Add agrega un complemento a la lista de complementos disponibles,
pero no lo instala. Establezca la propiedad Installed del complemento en
True para instalarlo. Para instalar un complemento que no aparezca en la
lista de complementos disponibles, primero se debe utilizar el método Add y
después establecer la propiedad Installed. Puede hacerlo en un solo paso,
como se muestra en el ejemplo siguiente (tenga en cuenta que, con el método
Add se usa el nombre del complemento, no su título).

AddIns.Add("generic.xll").Installed = True
Para devolver una referencia al libro correspondiente a un complemento
cargado, utilice Workbooks(índice), donde índice es el nombre de archivo del
complemento (no su título). Se debe utilizar el nombre de archivo porque los
complementos cargados no aparecen normalmente en el conjunto Workbooks. Este
ejemplo establece la variable wb como el libro de Myaddin.xla.

Set wb = Workbooks("myaddin.xla")
El ejemplo siguiente establece la variable wb como el libro del complemento
Analysis Toolpak.

Set wb = Workbooks(AddIns("analysis toolpak").Name)
Si la propiedad Installed devuelve True, pero las llamadas a las funciones
del complemento siguen fallando, es posible que éste no se haya cargado
realmente. Esto se debe a que el objeto Addin representa la existencia y el
estado de instalado del complemento pero no representa el contenido real del
libro del complemento. Para garantizar que un complemento instalado esté
cargado, se ha de abrir el libro del complemento. En el siguiente ejemplo se
abre el libro correspondiente al complemento denominado "My Addin" si éste
no está presente todavía en el conjunto Workbooks.

On Error Resume Next ' turn off error checking
Set wbMyAddin = Workbooks(Addins("My Addin").Name)
lastError = Err
On Error Goto 0 ' restore error checking
If lastError <> 0 Then
' the add-in workbook isn't currently open. Manually open it.
Set wbMyAddin = Workbooks.Open(Addins("My Addin").FullName)
End If

Atte.
?T Francisco T?
http://groups.msn.com/ExcelVbaMacrosOffice

El verdadero buscador crece y aprende, y descubre que siempre es el
principal responsable de lo que sucede.
Jorge Bucay

La oscuridad nos envuelve a todos, pero mientras el sabio tropieza en alguna
pared, el ignorante permanece tranquilo en el centro de la estancia.
Anatole France


begin 666 parchild.gif
M1TE&.#EA$0`9`(#_`/___P```"'Y! $`````+ `````1`!D`0 (CA&^!RZ -
@HYSHT70SLY=3/X':V(UB=$)ILVZF&<1R3-9V5@``.P``
`
end