Sub Macro5()
'
' Macro5 Macro
' Macro recorded 11/15/2004 by RXVP
'
'
Dim t As Integer
Dim b As Boolean
b = True
While b
t = t + 1
If Range("a" & t).Value = "" Then
b = False
Else
If (Range("h" & t).Value = "0" And Range("i" & t).Value = "0"
Then
Rows(t & ":" & t).Select
Selection.Delete Shift:=xlUp
End If
End If
Wend
End Su
Ask a Question
Want to reply to this thread or ask your own question?
You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.