Macros to Delete Rows in Excel 2007
Solved/Closed
Shiva
-
Mar 22, 2011 at 07:20 AM
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 - Mar 22, 2011 at 10:58 AM
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 - Mar 22, 2011 at 10:58 AM
Hello,
I want to delete the rows which contains number less than value 1000 in one column.
For instance, I have column AJ which shows the value. I wanted to delete the entire row where column AJ Value contains < 1000.
Please help me on the same.
Thanks in Advance.
I want to delete the rows which contains number less than value 1000 in one column.
For instance, I have column AJ which shows the value. I wanted to delete the entire row where column AJ Value contains < 1000.
Please help me on the same.
Thanks in Advance.
Related:
- Macros to Delete Rows in Excel 2007
- Save as pdf office 2007 - Download - Other
- Excel online macros - Guide
- Number to words in excel - Guide
- How to delete a row in a table in word - Guide
- Gif in excel - Guide
1 response
TrowaD
Posts
2921
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
December 27, 2022
555
Mar 22, 2011 at 10:58 AM
Mar 22, 2011 at 10:58 AM
Hi Shiva,
Try this code:
Do let me know how this works out for you and if any adjustments are needed.
Best regards,
Trowa
Try this code:
Sub DeleteRows()
lRow = Range("AJ" & Rows.Count).End(xlUp).Row
Set MR = Range("AJ1:AJ" & lRow)
For Each cell In MR
If cell.Value < 1000 And cell.Value <> "" Then cell.EntireRow.Delete
Next
End Sub
Do let me know how this works out for you and if any adjustments are needed.
Best regards,
Trowa
