Hi,

I have a problem regarding the VBA Solver Code. The Code looks like
this:

SolverOk SetCell:=[DCRAve], MaxMinVal:=3, ValueOf:=[MO_DCRMin].Value,
ByChange:=[MO1DCR]
SolverSolve

The Solver works fine if I put a Value (ex. 0.4) in ValueOf but does
not work with a reference to a Spreadsheet Cell (neither
Range("B12").Value, Range("B12"), nor [MO_DCRMin]

Has anybody an idea how to solve this problem??

Also, I do not want the Solver Dialogbox to pop up and ask me to accept
the stuff. It shall be accept in all of the cases.

How to do that??

Thank You very much for helping me out,

Karl