Experiment with:

Sub goally()
For Each ws In Worksheets
ws.Activate
v = Range("AB35").Value
Range("Y35").GoalSeek Goal:=v, ChangingCell:=Range("AB7")
Next
End Sub
--
Gary''s Student - gsnu200742


"AlfredR" wrote:

Hello!

I have an Excel Workbook with about 30-40 sheets with equal structure. Every
time I make changes in some of the input values, I have to use goalseeking on
each of those 30-40 sheets to make the model right. Is there av way to
automate this process on every sheet in my workbook? (E.g Excel Solver,
Macros, Add-ins?)

The goalseeking problem is like this on every sheet:
I Would like to....
Make cell Y35 to be equal cell AB35 by changing cell AB7.