#REF! in while loop

dear all

i wrote a macro with a while clause, unfortunately there are also some
rows which have #REF! and I want to delete them as well. How do I do
it?

last= 2011
Do While IsNumeric(ActiveSheet.Cells(i, 1).Value) And
ActiveSheet.Cells(i, 1).Value > last


Dirk

if iserror(Activesheet.Cells(i,1).value) then
' cell contains an error value


--
Regards,
Tom Ogilvy


<[email protected]> wrote in message
news:[email protected]...
> dear all
>
> i wrote a macro with a while clause, unfortunately there are also some
> rows which have #REF! and I want to delete them as well. How do I do
> it?
>
> last= 2011
> Do While IsNumeric(ActiveSheet.Cells(i, 1).Value) And
> ActiveSheet.Cells(i, 1).Value > last
>
>
> Dirk
>