Re: Possible to select and delete multiple items

Tech-Archive recommends: Repair Windows Errors & Optimize Windows Performance

From: Tom Ogilvy (twogilvy_at_msn.com)
Date: 01/03/05 

Date: Mon, 3 Jan 2005 10:34:13 -0500

is there a rule to apply to decide which ones to delete, or do you just need
to compare each row to a list of IDs you want to delete?

If the latter, then that is basically what you would need to do - compare
each row to a list. There are many different ways to approach that. Is the
list of id's in a worksheet in another location?

set rw = cells(rows.count,"F").End(xlup)
list = Array("DRH1", "DRH2", "DRH3", "DRI1", _
  "DRI2","DRI3", "DRIA", "DRIB")
for i = rw to 1 step -1
  res = Application.Match(cells(rw,"F").Value,list,0)
  if not iserror(res) then
     cells(rw,"F").EntireRow.delete
  end if
Next

another way

set rw = cells(rows.count,"F").End(xlup)
list = Array("DRH1", "DRH2", "DRH3", "DRI1", _
  "DRI2","DRI3", "DRIA", "DRIB")
for i = lbound(list) to ubound(list)
set rng = Range(cells(1,"F"),cells(rw,"F"))
      res = Application.Match(list(i),rng,0)
  if not iserror(res) then
     rng(res).EntireRow.delete
  end if
Next

and there are others 

-- 
Regards,
Tom Ogilvy
"Annette" <Samm@hotmail.com> wrote in message
news:esovyca8EHA.2700@TK2MSFTNGP14.phx.gbl...
> If I had a spreadsheet with worker ids in column F and I wanted to select
> and delete a couple different ids at the same time, is this possible?
>
> They start out CSC1, then jump to DRA1 through DRZZ ... in the middle are
> the ones I don't want deleted (for example:  DRH1, DRH2, DRH3, DRI1, DRI2,
> DRI3, DRIA, DRIB, etc.)
>
> Is this possible?
>
> Thanks,
>
> Annette
>
>

Relevant Pages

  • Re: Okena StormWatch
    ... > How does it compare to Snort w/ ACID? ... Okena's Stormwatch product is less of an IDS, ... \winnt\system32\*) the Okena product could actually BLOCK those requests. ... application behavior "policies" for each and every app you plan on ...
    (Focus-IDS)
  • Re: How to measure status of IDS Deployment
    ... >I have been tasked with comparing my IDS deployment at work to determine ... >it is hard to quantify and compare placement issues and success. ... If you can investigate things faster with the IDS, ... >How do you, perhaps as a ROI issue, justify the money spent and compare ...
    (Focus-IDS)
  • Re: Comparing the performance of two IDS products with different architectures
    ... Comparing the performance of two IDS products with different architectures ... > Does anyone know if there is justification to compare the performance of IDS ...
    (Focus-IDS)
  • Re: Possible to select and delete multiple items
    ... let me start with this as I'm thinking the first code ... > to compare each row to a list of IDs you want to delete? ... >> If I had a spreadsheet with worker ids in column F and I wanted to ...
    (microsoft.public.excel.programming)