Add Information Box to Macro
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
|