HI,
I'd like to add a message box that requires no input to the following macro.
The message box should say "Reviewing Row [i]" and should close when the
macro is done.

THANKS!


Private Sub CommandButton1_Click()
Dim i As Long

i = 7
Do
If Sheets(2).Cells(i, 8).Value = "CLOSED" Then
Rows(i).EntireRow.Hidden = True
End If
i = i + 1
Loop Until i = 300

End Sub