ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Worksheet Functions (https://www.excelbanter.com/excel-worksheet-functions/)
-   -   delete row is if a cell value is higher than... (https://www.excelbanter.com/excel-worksheet-functions/77253-delete-row-if-cell-value-higher-than.html)

barkiny

delete row is if a cell value is higher than...
 

A column

50
800
Ron
Dave
0
400

i want to delete the entire row if a cell 300

thanks in advance


--
barkiny
------------------------------------------------------------------------
barkiny's Profile: http://www.excelforum.com/member.php...o&userid=20397
View this thread: http://www.excelforum.com/showthread...hreadid=522295


Paul B

delete row is if a cell value is higher than...
 
Barkiny, you could use autofilter and filter using custom 300 then delete
the rows, or you could use a macro like this

Sub Deleterows()
'will delete rows where column A 300
Dim lastrow As Long, r As Long
Application.ScreenUpdating = False
lastrow = Cells(Rows.Count, "A").End(xlUp).Row
For r = lastrow To 2 Step -1
If Cells(r, "A") 300 Then
Rows(r).EntireRow.Delete
End If
Next r
Application.ScreenUpdating = True
End Sub

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"barkiny" wrote in
message ...

A column

50
800
Ron
Dave
0
400

i want to delete the entire row if a cell 300

thanks in advance


--
barkiny
------------------------------------------------------------------------
barkiny's Profile:
http://www.excelforum.com/member.php...o&userid=20397
View this thread: http://www.excelforum.com/showthread...hreadid=522295





All times are GMT +1. The time now is 11:11 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com