Hi

Nothing seems to be wrong with the line.

What is the error description more than error 1004 ?

Do you have the formula etc. in row 1 column 201:203 ?

Hopes this helps.
....
Per

"Jason" skrev i meddelelsen
...
I am trying to use the GoalSeek function in my VBA, but am unable to get it
to work, I have been getting 1004 error

Here is the line that seems to cause the 1004 error

Worksheets("Data Sheet").Cells(1, 203).GoalSeek Goal:=Worksheets("Data
Sheet").Cells(1, 201).Value, _
Changingcell:=Worksheets("Data Sheet").Cells(1, 202)

Please let me know if you need more info.

Thank you,