The assistance I have previously received in this Forum has been excellent.
I am thanking you in advance for any assistance regarding the following issue.



I have a column consisting of predictable data categories such as the following:

Column "A"
aaaa
bbbb
cccc
dddd
eeee

Unfortunately, the data is available to me with an unknown number of blank rows separating them such as:

Column "A"
"aaaa"


"bbbb"
"cccc"

"dddd"




"eeee"

The number of blank rows is inconsistent from one source to the next. I would like a procedure that will eliminate any blank rows between the values "aaaa" through "eeee". In addition, the nature of the beast is such that filter sorting is not an option.

If your data starts in A1 and there is nothing in column A below "eeee", this should work

NoSparks...Thank you very much for your input. Will try this tomorrow...after good nights sleep.

If I just wanted to delete the blank cells, to what would I change "EntireRow.Delete" ?

Could not wait till tomorrow. If there are blank cells it works great, but if there are no blank cells then I get an error message saying no cells found and it interrupts the procedure.

Another thing raised its ugly head. Commas are an issue as well as blank cells. Assuming another line of code, to what would I change (xlBlanks) to get rid of the commas?

Think you need to clarify what you're trying to do and what you're trying to do it with.

Posting a (de-sensitized) sample workbook with a 'before' and 'after' example would have us all dealing with the same thing.