Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Delete row if all cells are blank, Excel 2000 & 2003
Hello,
I have a worksheet with 1061 rows and 7 columns of data. Example: column A B C D E aa bb cc vv mm blank row ss I'm need a macro to delete only the blank rows. I've tried the following macro but it deletes a row when it finds a empty cell. Can this macro be modified to delete a row with all empty cells only? Sub DeleteRowsExampleB() 'Delete Selected Rows with specified data Dim c As Range Dim x As Range Set x = Selection For Each c In x If c.Value = "" Then c.EntireRow.Delete End If Next c End Sub Thank you for your help, jfcby |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Using a function to delete blank cells | Excel Worksheet Functions | |||
In Office 2000, How do I delete multiple blank rows at one time? | Excel Worksheet Functions | |||
Macro to Delete blank cells | Excel Worksheet Functions | |||
unlocked cells in excel 2000 now locked when opened in 2003 why? | Excel Discussion (Misc queries) | |||
In Excel 2000, Cannot edit cells in worksheet created in 2003? | Excel Discussion (Misc queries) |