PLEASE HELP.. It may cost me my job!!!!


--
ICSAnalyst
------------------------------------------------------------------------
ICSAnalyst's Profile: http://www.excelforum.com/member.php...o&userid=15095
View this thread: http://www.excelforum.com/showthread...hreadid=278729

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

--
anilsolipura
-----------------------------------------------------------------------
anilsolipuram's Profile: http://www.excelforum.com/member.php...fo&userid=1627
View this thread: http://www.excelforum.com/showthread.php?threadid=27872