Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11
Default Delete multiple rows

Excel 2000

Hi
I would like a macro to

Find a cell with unique criteria
Delete the row with the cell and 3 rows below.

Was able to find the cell
then delete the row with the cell but having difficulty deleting the 3 rows
below.

Currently I have:

Range(ActiveCell, ActiveCell.End(xldown).select
Selection.delete

Tried to code to select additional rows with row+3 in various configuration
but it gave me an errors.
Obviously I do not know enough.
Any help would be appreciated.

Thank you
PJ



  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 2,494
Default Delete multiple rows

you can try this
Range(ActiveCell,activecell.Offset(3)).entirerow.d elete

--


Gary


"PJ Usher" wrote in message
...
Excel 2000

Hi
I would like a macro to

Find a cell with unique criteria
Delete the row with the cell and 3 rows below.

Was able to find the cell
then delete the row with the cell but having difficulty deleting the 3 rows
below.

Currently I have:

Range(ActiveCell, ActiveCell.End(xldown).select
Selection.delete

Tried to code to select additional rows with row+3 in various configuration
but it gave me an errors.
Obviously I do not know enough.
Any help would be appreciated.

Thank you
PJ





  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11
Default Delete multiple rows


Hi Gary
It works just the way I wanted.
You guys are great!!
Thank you very much

PJ


"Gary Keramidas" <GKeramidasATmsn.com wrote in message
...
you can try this
Range(ActiveCell,activecell.Offset(3)).entirerow.d elete

--


Gary


"PJ Usher" wrote in message
...
Excel 2000

Hi
I would like a macro to

Find a cell with unique criteria
Delete the row with the cell and 3 rows below.

Was able to find the cell
then delete the row with the cell but having difficulty deleting the 3
rows
below.

Currently I have:

Range(ActiveCell, ActiveCell.End(xldown).select
Selection.delete

Tried to code to select additional rows with row+3 in various
configuration
but it gave me an errors.
Obviously I do not know enough.
Any help would be appreciated.

Thank you
PJ







Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Hpw do I delete multiple empty rows found between filled rows? Bill Excel Worksheet Functions 2 November 15th 09 07:12 PM
Delete all rows below certain value on multiple worksheets? [email protected] Excel Discussion (Misc queries) 1 January 4th 08 05:51 PM
Delete Blank Rows Code - Multiple Worksheets - Multiple Documents BenS Excel Discussion (Misc queries) 3 June 29th 07 12:20 AM
Delete Rows from multiple Sheets. drbobsled Excel Programming 3 April 7th 05 01:23 AM
Delete multiple rows Steph[_3_] Excel Programming 1 January 28th 04 04:31 PM


All times are GMT +1. The time now is 02:34 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"