Excel Addins - Index or key

  • Thread starter Thread starter mangesh_yadav
  • Start date Start date
M

mangesh_yadav

Yes, but this requires me to have the knowledge of what that particular
addin is called in different languages. I would like to have a language
independent method.

- Mangesh
 
Try this:

Sub ToolPakActivate()
Dim ai As Object
For Each ai In Application.AddIns
If UCase$(ai.Name) = "ANALYS32.XLL" Then
If Not ai.Installed Then ai.Installed = True
Exit For
End If
Next
If ai Is Nothing Then
MsgBox "Run setup to install the Analysis Toolpak"
End If
End Sub

Note the installed property indicated that the addin is LOADED.


keepITcool

< email : keepitcool chello nl (with @ and .) >
< homepage: http://members.chello.nl/keepitcool >
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top