Few macro issues

[Abattage]

Okay guys I need some help now. I'm building my first ever macro in excel and I have 2 maybe 3 issues.

I put out a post earlier today : Link : where I was asking for help, I did not get any responses, but that is no problem cus I figured out how to handle it, at least mostly. But now let's get to the problems.

I will attach the excel sheet so you can take a look at the macro.

What : My delete all empty rows thing is not working like is should

Please Login or Register  to view this content.

Question: How can I make it delete all empty lines?
Thx for all the help.

Davíð.

[Stuie]

one thing to remember is when you delete a row it shifts up so,

when i delete row 32, row 33 is now row 32 and my loop doesnt know that and goes to row 33.

so if you have two blank rows one after the other the second row will be missed and not deleted

[gummi]

If it's enough just to hide them, you could do

Please Login or Register  to view this content.

[ilyaskazi]

The above code deletes empty rows based on column-A and works perfect for me.

Please change your below code if your column criteria is different...

row_count = Cells(Rows.Count, "a").End(xlUp).Row

Change letter "a" to your column letter to take effect.




...

[Abattage]

Thx for the help so far but is there anyway to just get excel to hide/dlt all empty rows with macro.

So it just says: Is there is nothing in the hole row down to row 40 then dlt them ?. That is the code I'm looking for, cus with the code I have I only dlt a part of what I want to dlt.

Also I'm looking for a code to do one thing. "If there is a X in !Verðbanki(W8:W14) then replace it with 1" and then in the end of the macro, "If there is a 1 in !Verðbanki(W8:W14) then replace it with X".

If anyone would be so kind to put in code for that or a hint it would be great.

Thx again