Tom......you were right! your sugestions done the trick. However I am still
a little unsure why.

The problem arrises when another sub sets the criteria to LookIn:- values
and I need to change that criteria to LookIn Formulas to get the following
line to work

Sheets("VS").Columns("B").Find(what:=rng).Offset(0 , 8)
=Sheets("VS").Columns("B").Find(what:=rng).Offset( 0, 8) + rng.Offset(0, 4)

However I am not looking in formulas, a typical value of rng would be
"WS342" and the search would be for a cell containing the same, No Fomulae
on the page!



Tom Ogilvy wrote in message
...
Hopefully you will get a more meaningful answer from someone more
knowledgeable.

--
Regards,
Tom Ogilvy

Stuart wrote in message
...
I will give that a go next time the problem occurs, however, I doubt
that
is
the answer, as it performs a very simillar find with the same settings
on
a
very simillar piece of date 10 lines before the problem line! And why
won't
it work properly again until the Application is reStarted, simply
reStarting
the workbook makes no differance!




Tom Ogilvy wrote in message
...
Find has several persistent values. You are only setting the search
target,
so some previous use of find could set one of the other values so that
the
find is not made. xlwhole vice xlpart, xlformulas vice xlvalues for
example can affect whether the target is found. If it is a date,
then
it
can get even more complicated.


--
Regards,
Tom Ogilvy