Thanks for that, but it doesn't seem to have helped.
The "Can't load Solver Add-In" message always appears. And
the solver still doesn't work.

In this workbook I'm working on I don't get a "Solve"
option in the Tools menu, although when I open a new blank
workbook I do.

The solver add-in was working OK before I added the Splash
form to show on opening, but I don't see why this would
affect it.

Cheers

Will
-----Original Message-----

The solver addin will not LOAD until called.
(and it will load on deactivate/activate the addin)

To see this behaviour:
Open a new instance of Excel,
Open VBE
Open Project explorer = Solver.xla NOT loaded.

Now in Excel Choose Tools/Solve and it gets loaded.

This could be the code..

Function SolverOpen() As Boolean
On Error Resume Next
'Loaded?
Set wb = Workbooks("solver.xla")
If Err < 0 Then Set wb = _
Workbooks.Open(AddIns("Solver Add-in").FullName)
If Err < 0 Then SolverOpen = True
End Function

Sub tst()
If Not SolverOpen Then MsgBox "Can't load Solver Add-In"
End Sub





--
keepITcool
| www.XLsupport.com | keepITcool chello nl | amsterdam


Will wrote :

Hello

Can anyone help me with this problem I'm having:

I have a spreadsheet that uses the Excel Solver add-in.
This spreadsheet also has a form that is called from
the
workbook_open macro to display on starting the
spreadsheet.
I have found that if the screen is displayed, the macro
that uses the solver add-in does not work - I get the
message "Solver: an unexpected internal error occurred,
or
available memory was exhausted". If the form is not
displayed on opening the solver macro works OK.
As far as I can tell the form is being proplerly
unloaded
when it closes.

I have found that if I manually uninstall the solver
add-
in, then re-install it (from the Tools - Add-In menu)
it
starts working again.
But if I try and do this with code in the workbook_open
macro it either makes no difference or
causes "Method 'Range' of object '_Global' failed"
errors
further along in the workbook_open macro.

Anyone have any ideas how to get around this?

Cheers

Will

.