Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
DELETING BLANK ROWS
Hello,
I there an easy way to delete all rows if a certain colum is blank? I have 5000 rows and wish to delete all, f colum b is blank. Thank you |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
DELETING BLANK ROWS
Hi
try the following macro: Sub delete_rows() Dim lastrow As Long Dim row_index As Long Application.ScreenUpdating = False lastrow = ActiveSheet.Cells(Rows.Count, 2).End(xlUp).Row For row_index = lastrow - 1 To 1 Step -1 If Cells(row_index, 2).Value = "" then rows(row_index).delete End If Next Application.ScreenUpdating = True End Sub also have a look at: http://www.xldynamic.com/source/xld.Deleting.html -- Regards Frank Kabel Frankfurt, Germany Robert Lowe wrote: Hello, I there an easy way to delete all rows if a certain colum is blank? I have 5000 rows and wish to delete all, f colum b is blank. Thank you |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
DELETING BLANK ROWS
Try this Robert
Sub DeleteBlankRows() On Error Resume Next 'In case there are no blank rows Columns("B").SpecialCells(xlCellTypeBlanks).Entire Row.Delete On Error GoTo 0 End Sub -- Regards Ron de Bruin http://www.rondebruin.nl "Robert Lowe" wrote in message .. . Hello, I there an easy way to delete all rows if a certain colum is blank? I have 5000 rows and wish to delete all, f colum b is blank. Thank you |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
DELETING BLANK ROWS
Thank you both, they work great!
Regards Robert "Robert Lowe" wrote in message .. . Hello, I there an easy way to delete all rows if a certain colum is blank? I have 5000 rows and wish to delete all, f colum b is blank. Thank you |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
deleting blank rows | New Users to Excel | |||
Deleting blank rows | Excel Worksheet Functions | |||
Deleting Blank Rows | New Users to Excel | |||
deleting blank rows | Excel Programming | |||
Deleting Blank Rows | Excel Programming |