Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Goalseek - loop range
Could someone pls correct/improve my macro - thxs
Sub Goal_SeekRANGt() TargetVal = Range("Setcell").Offset(0, 1).Resize(1, 12).Address DesiredVal = Range("Changedto").Offset(0, 1).Resize(1, 12).Address ChangeVal = Range("ByChanging").Offset(0, 1).Resize(1, 12).Address ' Loop through the goalseek method For i = 1 To TargetVal.Columns.Count TargetVal.Cells(i).GOALSEEK Goal:=DesiredVal.Cells(i).Value, ChangingCell:=ChangeVal.Cells(i) Next i End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Multiple Goalseek - Range | Excel Programming | |||
Nothing happens with range("B2").Goalseek _... | Excel Programming | |||
loop through cells in a range and pick up corresponding cell values in another range | Excel Programming | |||
GoalSeek in VBA | Excel Discussion (Misc queries) | |||
"GoalSeek method of Range object failed" error message | Excel Programming |