Hi there

I have to create 500 lines of almost identical VBA code. Code is

Range("y10").GoalSeek Goal:=ActiveSheet.Range("z10").Value,
ChangingCell:=Sheets("FTSE").Range("x10")
Range("y11").GoalSeek Goal:=ActiveSheet.Range("z11").Value,
ChangingCell:=Sheets("FTSE").Range("x11")
Range("y12").GoalSeek Goal:=ActiveSheet.Range("z12").Value,
ChangingCell:=Sheets("FTSE").Range("x12")

and so on untill

Range("y500").GoalSeek Goal:=ActiveSheet.Range("z500").Value,
ChangingCell:=Sheets("FTSE").Range("x500")

What is the most logical way to proceed, please ?

All the best
Daniel