can be used for various operations on Excel Worksheets
such as deleting rows
that satisfy a particular given condition. Although not necessary, some knowledge of programming concepts and for loops
may prove to be useful to write a macro in Excel. Macros in Excel to delete rows
that satisfy certain conditions can be written from scratch or developed from a freely available macro code. Macros are a very useful feature and can be used to accomplish data manipulations on Excel Worksheets
with a large number of records. Macros in Excel
automate the process making the task fast and error-free.
I need a Macro for deleting rows when none of the cells in the row contain one of two numbers "103526" or "103527"
The number of rows is variable (max 150) and number of columns variable too (max 100).
Any help is appreciated.
Your condition is confusing to me. I am rephrasing it.
If a row contains either 103526 or 102527 or both then DO NOT delete.
If neither of the two numbers is in a row, delete.
Now, as you are deleting the rows, keep a copy of the data in sheet1 to sheet2 so that you can copy the data if there is a mess up.
The data is in sheets 1, try this macro:
Dim j As Integer, k As Integer
Dim r As Range, cfind6 As Range, cfind7 As Range
On Error Resume Next
j = Cells(Rows.Count, "A").End(xlUp).Row
For k = j To 1 Step -1
Set cfind6 = Rows(k).Cells.Find(what:=103526, lookat:=xlWhole)
Set cfind7 = Rows(k).Cells.Find(what:=103527, lookat:=xlWhole)
If cfind6 Is Nothing And cfind7 Is Nothing Then Rows(k).Delete
Thanks to venkat1926
for this tip on the forum.
This document, titled « Excel - A macro for deleting row on condition », is available under the Creative Commons
license. Any copy, reuse, or modification of the content should be sufficiently credited to CCM