Can you access the solver reference library in Excel 2002
sp 2 e.g.

Sub RunSolver()
' Set up and run Solver.
SolverOk SetCell:=Range("PortStdev"), MaxMinVal:=2, _
ByChange:=Range("Weights")
SolverAdd CellRef:=Range("SumWts"), Relation:=2,
FormulaText:=1
SolverAdd CellRef:=Range("MeanReturn"), Relation:=3, _
FormulaText:="ReqdReturn"
SolverOptions AssumeNonNeg:=True
SolverSolve UserFinish:=True
End Sub

I can't establish a reference to the solver library.

TIA

Have you checked XL VBA help for the SolverOK function? The 2nd
paragraph details how to establish a reference to the Solver library.

--
Regards,

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

In article ,
says...
Can you access the solver reference library in Excel 2002
sp 2 e.g.

Sub RunSolver()
' Set up and run Solver.
SolverOk SetCell:=Range("PortStdev"), MaxMinVal:=2, _
ByChange:=Range("Weights")
SolverAdd CellRef:=Range("SumWts"), Relation:=2,
FormulaText:=1
SolverAdd CellRef:=Range("MeanReturn"), Relation:=3, _
FormulaText:="ReqdReturn"
SolverOptions AssumeNonNeg:=True
SolverSolve UserFinish:=True
End Sub

I can't establish a reference to the solver library.

TIA

In order to access the Solver Reference library, go to
Tools - References and ensure SOLVER is checked. Then it
should work fine.

Tim Anderson
-----Original Message-----
Can you access the solver reference library in Excel 2002
sp 2 e.g.

Sub RunSolver()
' Set up and run Solver.
SolverOk SetCell:=Range("PortStdev"), MaxMinVal:=2, _
ByChange:=Range("Weights")
SolverAdd CellRef:=Range("SumWts"), Relation:=2,
FormulaText:=1
SolverAdd CellRef:=Range("MeanReturn"), Relation:=3, _
FormulaText:="ReqdReturn"
SolverOptions AssumeNonNeg:=True
SolverSolve UserFinish:=True
End Sub

I can't establish a reference to the solver library.

TIA
.