Goal Seek in a loop

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have used the following to run a simple goalseek on one line.

Range("AE3").Select
Range("AE3").GoalSeek Goal:=0, ChangingCell:=Range("AA3")

Is it possible to get this doen in a loop acting on every entry in column AE?
 
Brother said:
I have used the following to run a simple goalseek on one line.

Range("AE3").Select
Range("AE3").GoalSeek Goal:=0, ChangingCell:=Range("AA3")

Is it possible to get this doen in a loop acting on every entry in column AE?
Click to expand...


How about something of the form:

x=3
y$ = "AE" + FORMAT(x,"#")
while range(y$) > 0
Do your stuff here
x = x+1
wend

Bill
 
Brother said:
I have used the following to run a simple goalseek on one line.

Range("AE3").Select
Range("AE3").GoalSeek Goal:=0, ChangingCell:=Range("AA3")

Is it possible to get this doen in a loop acting on every entry in column AE?
Click to expand...


How about something of the form:

x=3
y$ = "AE" + FORMAT(x,"#")
while range(y$) > 0
Do your stuff here
x = x+1
y$ = "AE" + FORMAT(x,"#")
wend

Bill
 
Back
Top