Hi Tom,

Thank you very much. Will give it a try, and if it does not work, will come
back.

Mangesh



"Tom Ogilvy" wrote in message
...
It isn't the only way. You could consult the help on goalseek and see:

"Returns True if the goal seek is successful."

Dim bRes as Boolean
bRes = Range("H5").GoalSeek( Goal:=0, ChangingCell:=Range("E5"))

Trusting the help - I haven't tested it.


--
Regards,
Tom Ogilvy


"Mangesh Yadav" wrote in message
...
Hi Tom,

Thanks.
So thats the only way.

Mangesh




"Tom Ogilvy" wrote in message
...
Check if the goal is met.

--
Regards,
Tom Ogilvy

"Mangesh Yadav" wrote in message
...
I am using the goalseek as follows

Range("H5").GoalSeek Goal:=0, ChangingCell:=Range("E5")

Sometimes I don't get a result. Manual running of the goal seek
would
give
me: May not have found a solution.
Whereas in VBA I don't get such a warning and the result is dumped
in
my
oupput cell. Is there some kind of flag or anything which could tell
me
if
the goal seek has found a solution or not...?


--
- Mangesh
------------------------------------------
Office 2003 & Windows XP