Add In question

[Bill Astarita]

I'm using functions located in the Analysis Toolpak. I was wondering if
there was a way to make the add-in automatically load on each machine the
sheet was open on. Thanks in advance

 

[Norman Harker]

Hi Bill!

I call the following from a Workbook_Open event macro in my Addin:

Sub AnalysisToolPak_Exists()
Dim Item As AddIn
Dim AnalysisToolpak As Boolean
AnalysisToolpak = False
For Each Item In AddIns
If Item.Name = "ATPVBAEN.XLA" Then AnalysisToolpak = True
Next Item
If AnalysisToolpak = False Then
Analysis_ToolPak_Not_Present.Show
End If
AddIns("Analysis Toolpak").Installed = True
AddIns("Analysis ToolPak - VBA").Installed = True
End Sub

I'll not pretend that it is not without faults and improvement
suggestions are more than welcome.

--
Regards
Norman Harker MVP (Excel)
Sydney, Australia
(e-mail address removed)
Excel and Word Function Lists (Classifications, Syntax and Arguments)
available free to good homes.