Excel 2000 Solver Problems

[speyry]

Just wondering if anyone has had the same problem, and if it is
fixable:

I am using excel 2000 with SP 3 and the solver doesn't seem to work -
both with programming it and using it in the worksheet. I found a
related kb article (821430) saying that it needed a hotfix, but there
are no hotfixes to be found anywhere. Is it just my computer, or can
it be fixed?

Please point me in the direction to go if it can be fixed. Thanks

 

[Laurin]

I can run solver fine in the spreadsheet manually (Excel 2000 SP-3), bu
I am having the same issue with regards to VBA. Below is the code
wrote:

Dim I As Integer
Dim DesiredVal As Range
Set DesiredVal = Range("OutputOCext")
Dim TargetCell As Range

For I = 1 To 228
Set TargetCell = DesiredVal.Cells(1, 1).Offset(I - 1, 3)
If DesiredVal.Cells(I) > 0 Then
SolverReset
SolverOk SetCell:=TargetCell.Address, MaxMinVal:=3
ValueOf:=TargetCell.Offset(0, -3).Value, ByChange:=TargetCell.Offset(0
-1).Address
SolverReset
SolverOk SetCell:=TargetCell.Address, MaxMinVal:=3
ValueOf:=TargetCell.Offset(0, -3).Value, ByChange:=TargetCell.Offset(0
-1).Address
SolverSolve UserFinish:=True
SolverFinish keepFinal:=1
If TargetCell.Offset(0, -1).Value < 0 Then
TargetCell.Offset(0, -1).Value = 0
SolverReset
SolverOk SetCell:=TargetCell.Address, MaxMinVal:=3
ValueOf:=TargetCell.Offset(0, -3).Value, ByChange:=TargetCell.Offset(0
-2).Address
SolverReset
SolverOk SetCell:=TargetCell.Address, MaxMinVal:=3
ValueOf:=TargetCell.Offset(0, -3).Value, ByChange:=TargetCell.Offset(0
-2).Address
SolverSolve UserFinish:=True
SolverFinish keepFinal:=1
End If
Else
TargetCell.Offset(0, -1).Value = 0
TargetCell.Offset(0, -2).Value = 0
End If
Next I

This works perfectly in Excel 2003 and in Excel 2000 (basic install
but with Excel 2000 SP-3 it does not. One thing I noticed is that i
the with Excel 2000 SP-3 if you open up solver after the macro runs
the "SetCell" and "ByChangingCell" boxes are not populated while the
are in the other versions of Excel for the last solution solve
performed. Apparently these references are not making it into thes
boxes with SP-3.

Also am using windows XP SP-2.

Does anybody know of a fix?

thanks,

Lauri

 

[Laurin]

Check this link for a fix:


http://support.microsoft.com/default.aspx?scid=kb;en-us;821430&Product=xlw

Unfortanately, it seems Microsoft will give you the fix for $35.00.
don't know why they won't post it as a free download; I mean we hav
already paid for a "broken" version. They shouldn't charge us to fi
it.

Or you can wait for SP-4 to come out. Apparently the fix will b
included in that

 

[Tushar Mehta]

Never having done this before, I do not speak from experience, but my
understanding is that the charge is waived for a hotfix.

--
Regards,

Tushar Mehta
www.tushar-mehta.com
Excel, PowerPoint, and VBA add-ins, tutorials
Custom MS Office productivity solutions