please help me out with this SOLVER issue

[reiswaffeln]

Hello,

I would really appreciate some help. I am struggling with this SOLVER in my Excel 2007. Here's the issue:

In the range of N10:N331 i have a set of numbers influencing the value of the function which lies in the range R10:R331 (so N10 influences only R10 and so on). I want all the values R10:R331 to match the fixed value I have in the cell M10, by using solver to modify the numbers in N10:N331 with about 150 iterations and a precision of 0.001. I figured out how to call the solver for one cell, but it would take a horrible effort to do this for every cell in the range R10:R331, especially if I have to change the value in M10 later.

This is what i have in the VBA:
--------------------------------------------------------------------------------
Sub isointensity
'
' Macro1 Macro

SolverOk SetCell:="$R$10", MaxMinVal:=3, ValueOf:="7.42560151115682E+27", _
ByChange:="$N$10"
SolverOptions MaxTime:=100, Iterations:=150, Precision:=0.001, AssumeLinear:= _
False, StepThru:=False, Estimates:=1, Derivatives:=1, SearchOption:=1, _
IntTolerance:=5, Scaling:=False, Convergence:=0.0001, AssumeNonNeg:=False
SolverOk SetCell:="$R$10", MaxMinVal:=3, ValueOf:="7.42560151115682E+27", _
ByChange:="$N$10"
SolverSolve True

End Sub
-------------------------------------------------------------------------------
The 7.4E27 number is from my cell M10.

Please, help me out by fixing this code so that it would work on all the numbers in the N10:N331 range. Thanks a lot!

Best wishes,
Marcus

[ragulduy]

Please Login or Register  to view this content.

[reiswaffeln]

Thank you so much! I let it run. I would have never figured this one out by myself.

Shame there's no bowing smiley, because that's what I'm doing now. Thanks again!