Delte blank rows between different sections of data
I have 5 sections of row of information consisting of approximately 50
securities. Between each of these sections are approximately 25 rows which contain no material in any of the columns of any of the 25 rows. I need a macro that will delete the blank rows between each of these segments without deleting any of the rows containing data. For point of information the rows with the data covers 5 columns. |
Delte blank rows between different sections of data
Steven
Public Sub DeleteRowOnCell() ''delete any row that has a blank in selected column(s) Set coltocheck = Application.InputBox(prompt:= _ "Select A Column", Type:=8) On Error Resume Next coltocheck.SpecialCells(xlCellTypeBlanks).EntireRo w.Delete End Sub Non-programming method to delete blank rows.......... Select a column. EditGo ToSpecialBlanksOK. EditDeleteEntire Row. Gord Dibben Excel MVP - XL97 SR2 & XL2002 On 25 Jul 2003 16:25:59 -0700, (Steven R. Berke) wrote: I have 5 sections of row of information consisting of approximately 50 securities. Between each of these sections are approximately 25 rows which contain no material in any of the columns of any of the 25 rows. I need a macro that will delete the blank rows between each of these segments without deleting any of the rows containing data. For point of information the rows with the data covers 5 columns. |
Delte blank rows between different sections of data
Gord Dibben wrote in message . ..
Steven Public Sub DeleteRowOnCell() ''delete any row that has a blank in selected column(s) Set coltocheck = Application.InputBox(prompt:= _ "Select A Column", Type:=8) On Error Resume Next coltocheck.SpecialCells(xlCellTypeBlanks).EntireRo w.Delete End Sub Non-programming method to delete blank rows.......... Select a column. EditGo ToSpecialBlanksOK. EditDeleteEntire Row. Gord Dibben Excel MVP - XL97 SR2 & XL2002 On 25 Jul 2003 16:25:59 -0700, (Steven R. Berke) wrote: I have 5 sections of row of information consisting of approximately 50 securities. Between each of these sections are approximately 25 rows which contain no material in any of the columns of any of the 25 rows. I need a macro that will delete the blank rows between each of these segments without deleting any of the rows containing data. For point of information the rows with the data covers 5 columns. Basically the above is helpful but the problem I am having is a little different from the above. There is no need to select a column in fact I do not want to have the option of selecting a column as the column that is blank is always A. With that in mind what I want to be able to do is to delete all rows that that are blank in column A. Point of information is that all rows in my data that are blank in column are also blank in every other column in that row column that |
All times are GMT +1. The time now is 09:10 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com