VBA Lesson 20: VBA for Excel Statements

This is an excerpt from Pierre Leclerc (www.excel-vba.com)

Among the VBA statements yu will discover If, Then, ElseIf, End If, Do, Loop, For, Next, While, With, the powerful "Select Case" statement and others.

A lot of visitors ask us how they can delete the entire lines when a certain cell is empty. First enter xxx where you want the loop to stop. Select the cell at the top of the column and  run this macro.

Sub proDelete()

        Do Until Selection.Value = "xxx"
                  If Selection.Value = "" Then
                          Selection.EntireRow.Delete
                  Else
                          Selection.Offset(1, 0).Select
                  End If
            Loop

            Range("A1").Select

End Sub

Exiting a Loop

In the loop above if you want the loop to stop when it finds the value 99 you can add this line of code within the loop:
If Selection.Value = 99  Then Exit Do

Exit allows you to get out of almost anything like:
Exit Sub
Exit For
Exit Do

Go to the next lesson
Lesson 21 : Functions in VBA for Excel