Newbie VBA Question; Deleting minimum value row
Hi, I have been struggling with a piece of code to identify the lowest
value in a column, select that value then delete the row record
containing that value.
So far I have:
Sub TEST()
Set FilterRange = Range("E2:E12" & Range("E12").Row)
FilterRange.AutoFilter Field:=1,
Criteria1:="=MIN(IF(E2:E12<0,E1:E12)) ", Operator:=xlAnd
FilterRange.SpecialCells(xlCellTypeVisible).Entire Row.Delete
FilterRange.AutoFilter
End Sub
This just deletes row 2, my brain is now burnt and would appreciate
ANY help.
Regards Paul Edwards
|