if cell is blank delete entire row

[thuddleston11]

In Macro QI and Macro QIFRH, I have this line and it is erroring out. Above in this macro I have it sorting because when it copies to the next sheet people will be entering data so I need the rows to line up with that data correctly. When I have Column g:g on the Macro QI if works fine. If just won't work in Column f:f. In Macro QIFRH it works fine if it is column F:F and doesn't work for column G:G.

See Attachment

Columns("g:g").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

[HaHoBe]

Hi, thuddleston11,

if no empty cells are involved or the entire column is empty the error is raised. You may work around it like

Please Login or Register  to view this content.

IŽd recommend to narrow down the size from a whole column to just the used range and work a bit on the code for QI:

Please Login or Register  to view this content.

Ciao,
Holger

[thuddleston11]

I tried this suggestion and I can't get it to work. It will work on Column g:g but if I change it to F:F it doesn't work. Not sure what I am doing wrong.

[HaHoBe]

Hi, thuddleston11,

do you mind to read what started my post?

if no empty cells are involved or the entire column is empty the error is raised.

Maybe you could tell me how many empty cells you find in Column F in the used range (F1:F983)? Can we agree on 982 which means all cells except the header are empty? You just copy a header over from Sheet QI to Birchaven and then copy that range to SW... - with the sample supplied that doesnŽt make a lot of sense to me to work with blank cells in Column F on SW....

Ciao,
Holger

[thuddleston11]

Maybe I was not clear. The macro is for the tab SW-Birchaven REF. I do agree with your first statement on column F for the import tab. What I was trying to say is that on the SW-Birchaven REF tab that I want column F to delete rows if column F is empty. This macro will work on Column G but not F. I don't know why. Sorry I was not clear before.

Terrie