Selecting a Blank Cell

[dwreed3785]

I was trying to record a macro that selected the first blank cell in a column (A). The problem I am having is that all cells down to row 300 have formulas and the result of the formula may be "". So I want to select the first cell with a value of "" in column A. So I can't record the macro with macro recorder (I was going to record doing a shift-end down 1 to find the first empty cell).

How might I do that in VBA?

AND then

select all rows from that row down to row 300 and then delete those rows.

 

[AlphaFrog]

Sub Delete_From_First_Blank()
    Dim Firstblank As Long
    Firstblank = Range("A:A").Find("", , xlValues, , , xlNext).Row
    Rows(Firstblank & ":300").Delete
End Sub

 

[dwreed3785]

Thanks that worked great.