There's no need to test whether its installed or not. Just set
the Installed property to true. There's no harm if it is already
installed.

Application.AddIns("Analysis ToolPak").Installed = True



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"Tom Ogilvy" wrote in message
...
Calculation is an application level setting and it is utilized
before your
code would run, so you can't control that for the opening of
your workbook.

Sub AddinInstall()
With Application.AddIns("Analysis Toolpak - VBA")
If .Installed = False Then
.Installed = True
End If
End With
With Application.AddIns("Analysis Toolpak")
If .Installed = False Then
.Installed = True
End If
End With
End Sub


--
Regards,
Tom Ogilvy



"Bill Hall" wrote in
message
...
When my Excel workbook is opened, I want the Excel code to
check to see if
the Add-Ins "Analysis Toolpack" is already installed on the
user's Excel
application. Because I am using several of the Analysis
Toolpack
functions
in my worksbook, I need the Add-Inns to be installed. If it
isn't
installed,
how do I code Excel to automatically install the "Add-Ins"
when the
workbook
is opened?

Similary, I need the Tools Options Calculation to be on
MANUAL for the
workbook to function normally. Am I able to include that in
my code?

Thanks in anticipation

Bill Hall