Home |
Search |
Today's Posts |
#1
|
|||
|
|||
delete row contains specific word in an macro
Hi, Im trying to delete row that contains specific expression like:
In row 444 column b contents (ESSO PRODUITS) i want to delete that row but i have more then one row to find and delete. |
#2
|
|||
|
|||
Try this on a spare copy:
Do a Data Filter Autofilter on col B Select from the droplist: ESSO PRODUITS Select all the filtered rows (select the "blue" row headers) Right-click Delete Row Remove Autofilter -- Rgds Max xl 97 --- GMT+8, 1° 22' N 103° 45' E xdemechanik <atyahoo<dotcom ---- Jean-Francois wrote in message ... Hi, Im trying to delete row that contains specific expression like: In row 444 column b contents (ESSO PRODUITS) i want to delete that row but i have more then one row to find and delete. |
#3
|
|||
|
|||
You can use datafilterautofilterfilter on that column for that value
OR a for/each macro to look, bottom up, for the value and then ..entirerow.delete -- Don Guillett SalesAid Software "Jean-Francois" wrote in message ... Hi, Im trying to delete row that contains specific expression like: In row 444 column b contents (ESSO PRODUITS) i want to delete that row but i have more then one row to find and delete. |
#4
|
|||
|
|||
Ok manually, but in a macro how would do that?
"Don Guillett" wrote: You can use datafilterautofilterfilter on that column for that value OR a for/each macro to look, bottom up, for the value and then ..entirerow.delete -- Don Guillett SalesAid Software "Jean-Francois" wrote in message ... Hi, Im trying to delete row that contains specific expression like: In row 444 column b contents (ESSO PRODUITS) i want to delete that row but i have more then one row to find and delete. |
#5
|
|||
|
|||
You could record a macro when you did the filtering and deleting to get your
code. or looping (like Don's second suggestion): Option Explicit Sub testme() Dim FirstRow As Long Dim LastRow As Long Dim iRow As Long With Worksheets("sheet1") FirstRow = 2 'headers in 1??? LastRow = .Cells(.Rows.Count, "B").End(xlUp).Row For iRow = LastRow To FirstRow Step -1 If UCase(.Cells(iRow, "B").Value) = UCase("ESSO PRODUITS") Then .Rows(iRow).Delete End If Next iRow End With End Sub Jean-Francois wrote: Ok manually, but in a macro how would do that? "Don Guillett" wrote: You can use datafilterautofilterfilter on that column for that value OR a for/each macro to look, bottom up, for the value and then ..entirerow.delete -- Don Guillett SalesAid Software "Jean-Francois" wrote in message ... Hi, Im trying to delete row that contains specific expression like: In row 444 column b contents (ESSO PRODUITS) i want to delete that row but i have more then one row to find and delete. -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Open Word Doc From Excel Macro | Excel Discussion (Misc queries) | |||
Macro to find and delete all FALSE statements | Excel Discussion (Misc queries) | |||
Hyperlink to word document problem | Links and Linking in Excel | |||
getting specific info from a word document into excel | Excel Discussion (Misc queries) | |||
Macro and If Statement | Excel Discussion (Misc queries) |