If you use Do While instead of For...Next loop,
you can use your own code adding just one more statements
like:
i=1
Do While i<=1000
With ActiveSheet.Cells(rwIndex, 1)
If ((.Value) = "X") Then
Rows(rwIndex).Delete
else
i=i+1
End If
End With
Loop

The use of For...Next updates the increments on every
loop "jumping" over the row immediately after the just
deleted. The code above will make sure that all the rows
are examined.


-----Original Message-----
I am working on a macro that will copy an entire row of
data onto another sheet based on a condition in the first
column. the only way i know how to do this is to copy
the
entire source worksheet into a temp worksheet, tag each
row as either keep or delete, delete all of the rows that
i dont want, and then copy the remainder to destination
worksheet. here is what i am trying to use to delete the
rows:

For rwIndex = 1 To 1000
With ActiveSheet.Cells(rwIndex, 1)
If ((.Value) = "X") Then
Rows(rwIndex).Delete
End If
End With
Next rwIndex

however, this formula does not work. i can get it to
hide
the rows (hidden = ture) but not delete. any ideas?
thanks
.