How to find values between a range and delete Solved/Closed

Question

Hello, 

I don't know where to begin in writing this macro.  If i have column J with values & I want to search for any values BETWEEN ranges of 1.00E+17 to 1.00E+38 and delete rows when it finds those values. 

Thanks
Irene


Configuration: Windows Vista / Internet Explorer 8.0

TrowaD · Answer

Hi Irene,

Try this macro:

Sub test()
Set MyRng = Range("A1:A20")
For Each cell In MyRng
    If cell.Value > 1E+17 And cell.Value < 1E+38 Then
    cell.EntireRow.Delete
        End If
    Next
End Sub

You might want to change the range and replace the < and > symbols by <= and >=.

Best regards,
Trowa

weenie · Answer

Thank You...it worked.

How to find values between a range and delete

2 responses

Similar discussions

Subscribe To Our Newsletter!