How to find values between a range and delete

December 2016


How to find values between a range and delete




Issue


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.

Solution


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 >=.

Note


Solved by TrowaD

Related :

This document entitled « How to find values between a range and delete » from CCM (ccm.net) is made available under the Creative Commons license. You can copy, modify copies of this page, under the conditions stipulated by the license, as this note appears clearly.