Delete All Rows Below Criteria in Col A / Then Delete Specific Rows in Col E

**LennyC91** · 03-14-2016, 05:24 PM

Hi Everyone,

I need a macro that deletes all rows below a certain criteria in column A. So when the term Technology appears I need every row below this word to be deleted.

Following this I need a macro to delete any rows in Column E that contain the term 0 Days.

I tried the following for the first issue but it doesnt seem to work for me? I am a novice to macro coding, so any help is greatly appreciated.

**alansidman** · 03-14-2016, 06:10 PM

Code Tags Added
Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE] [/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found at http://www.excelforum.com/forum-rule...rum-rules.html

(Because you are new to the forum, I have added them for you today. Please take a few minutes to read all Forum Rules and comply in the future.)

**JOHN H. DAVIS** · 03-15-2016, 08:22 AM

Maybe:

Sub LennyC91()
Dim i As Long, y As Long
y = Range("A" & Rows.Count).End(3).row
Range("A" & y).Activate
ActiveSheet.Cells.Find(What:="Technology", After:=ActiveCell, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlPrevious, MatchCase:=False).Activate
    i = ActiveCell.row + 1
    Rows(i & ":" & y).Delete
Range("E1:E" & Range("E" & Rows.Count).End(3).row).AutoFilter 1, "0 Days"
Range("E2:E" & Range("E" & Rows.Count).End(3).row).SpecialCells(12).EntireRow.Delete
ActiveSheet.AutoFilterMode = False
End Sub

Delete All Rows Below Criteria in Col A / Then Delete Specific Rows in Col E

LinkBack

Thread Tools

Rate This Thread

Display

Hybrid View

Delete All Rows Below Criteria in Col A / Then Delete Specific Rows in Col E

Re: Delete All Rows Below Criteria in Col A / Then Delete Specific Rows in Col E

Re: Delete All Rows Below Criteria in Col A / Then Delete Specific Rows in Col E

Thread Information

Users Browsing this Thread

Similar Threads

Delete Rows with specific criteria

How can I delete rows based on specific criteria using a macro?

Delete specific rows, creating range and criteria using inputbox

Delete rows based on specific criteria

Delete rows if specific criteria not met.

[SOLVED] Delete rows that do not meet specific criteria

I want to delete certain rows based on specific criteria

Tags for this Thread

Bookmarks

Bookmarks

Posting Permissions