View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Gauthier[_2_] Gauthier[_2_] is offline
external usenet poster
 
Posts: 11
Default Error - End If Without Block

Hi There...for the likes of me, i just can't get this to work!
Can anyone help?
Sandi

the following is a snippet of my module that won't work - i've already
declared "Dim X As Long" in a previous procedure - and incidentially, i
started the range with column C, because the last two cells in column A are
blank:

' CODE TO DELETE ROWS WHICH CONTAIN BLANK VALUES IN COLUMN A, AND "FALSE"
IN COLUMN I
For X = Range("C65536").End(xlUp).Row To 1 Step -1
If Range("A" & X) = "" Or _
Range("I" & X) = "FALSE" Then _
Range("A" & X).EntireRow.Delete
End If
Next