View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
ina ina is offline
external usenet poster
 
Posts: 120
Default Delete row if cell has nothing

Hello,

I woulk like to delete row when in your cell the value is N/A#

This is my code

I have a bi-dimensional var (1 to 1000, 1 to 9) as variant


For n = LBound(var) To UBound(var)

Do
Set rng = Range("A:A").Find(What:="N/A#", _
After:=Range("A" & Rows.Count), _
LookIn:=xlFormulas, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False)
rng.EntireRow.Delete

Loop While Not (rng Is Nothing)

Next n

this is the row

MARIANNE | DATE| N/A# | 125.-

I would like to delete this row do you think you need to use cell

ina