try this
Sub Blankitout()
Dim lastrow As Integer, i As Integer, j As Integer
Dim conds()
' ADD CONDITIONS HERE
conds = Array("AL", "AK", "NS", "SJ")
lastrow = Range("A" & Rows.Count).End(xlUp).Row
For i = 1 To lastrow
For j = LBound(conds) To UBound(conds)
If Range("A" & i) = cond
Hello All,
I have code that will look through column A for the string AL and if it if
found will blank out column B
if there is a value in the cell in the same row as column A. What I have
been trying to do is perform
same procedure but is there a way I can use multiple states, e.g. Look to