Question: I am trying to loop through a range in column A and delete each row where the value in cell A starts with a letter (e.g. delete C159, but not 8T9G3). I think the code may work correctly, if I get the between piece straight. Any suggestions how I can get the code to work? 

```
Sub DeleteLetterRows()

Dim k as integer

For k = 2 To 100
    If Asc(ActiveSheet.Range("A" & k).value) >=65 and <=90 or >=97 and <=122
        Rows(k).EntireRow.Delete
    Else
    End If
Next k

End Sub

```

Thanks!

Answer: 
You could do it via a like-join against a list of the terms to exclude :

```

data words ;
  input word $char16. ;
datalines ;
INELIGABLE
REFUSED
;
run ;

proc sql ;
  create table exclude as
  select a.*
  from data_set a
       left join
       words b on upcase(a.comment) like cats('%',b.word,'%')
  where missing(b.word) ;
quit ;

```
SQL does not have full regular expressions support. In SAS, you could use `prxmatch()`. But, you can also do this in SQL:

```
  PROC SQL;
     CREATE TABLE EXCLUDE as
         SELECT *
         FROM data_set
         WHERE UPCASE(COMMENT) like '%INELIGIBLE%' OR
               UPCASE(COMMENT) like '%REFUSED)%';
  QUIT;

```

Note: this will not use an index on `comment`.