Archive of Mr Excel Message Board


Back to Edit in Excel archive index
Back to archive home

Deleting Multiple Rows?

Posted by Chris Whisonant on September 12, 2000 6:56 PM
Here's the macro I need "repeated."

Rows("2:24").Select
Selection.Delete Shift:=xlUp
End Sub

I have over 18000 rows, and to start the sheet off at row 1 I have data followed by data in row 25. The 24 rows are hours in a day. Rows 2-24 have no data except that column "A" is the date column all the way down the sheet. Row 25 resumes with data and then is blank for the next 23 rows, and so on for the remaining 18000 rows. What needs to be done is the deletion of all the rows with no data.

Any suggestions appreciated,
Chris Whisonant


Re: Deleting Multiple Rows?

Posted by Chris Whisonant on September 13, 0100 6:05 AM
Worked without a macro! I appreciate your help Celia. I don't use excel much, but I knew there had to be a way to do it without a macro.

Thanks,
Chris


Re: Deleting Multiple Rows?

Posted by Celia on September 12, 0100 7:51 PM


Chris
If you need a macro :-

Columns("B:B").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

You can do it without a macro by :-

1.Select column B
2.Go to Edit>GoTo>Special>Blanks and click OK
3.Go to Edit>Delete>EntireRow and click OK

Celia


This archive is from the original message board at www.MrExcel.com.
All contents © 1998-2004 MrExcel.com.
Visit our online store to buy searchable CD's with thousands of VBA and Excel answers.
Microsoft Excel is a registered trademark of the Microsoft Corporation.
MrExcel is a registered trademark of Tickling Keys, Inc.