View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
SparePersn SparePersn is offline
external usenet poster
 
Posts: 2
Default Delete non-selected rows

Maybe I'm just being thick-headed here. Seems this should be so easy. Excel
2002. I want to delete all the rows that are not selected by the user. I
tried this code to no avail:

ShtBtm=cells(65536,"a").end(xlup).row
for a=shtbtm to 2 step-1
if not rows(a).selected then rows(a).delete
next a

That's what I want. Excel doesn't like rows(a).selected. Help!
Thanks!