I tried the info that you included, I copied it and pasted it in and it
didn't work. Some of the columns have drop down lists created to allow the
user to select a quick answer, but a blank is a valid option in the drop down
list, does this make a difference?

I also tried it in cells that do not have the drop down list and it still
wouldn't work.


"Don Guillett" wrote:


You said 7 columns wide but mention a-f which is 6. So, are you saying that
if there is something in any cell in col a,b,c,d,e,or f then leave and if
not delete the whole row. So, if something in col c leave it alone. If so,
use

Sub DeleteRowsifBlanks()
For i = 1 To cells(Rows.Count, 7).End(xlUp).Row
If Application.CountA(cells(i, 1) _
.Resize(, 6)) < 1 Then Rows(i).Delete
Next i
End Sub
--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Kris" wrote in message
...
I am looking for a way to have Excel automatically delete rows that have
columns that are blank.

Example:

If my row contains 7 columns across and column A & F do not have any data
in
them, I want Excel to delete the entire row.

If there is a way to create a macro to do this, I need specific
instructions
on how to create a macro, I have very little experience in macros.

I appreciate any and all assistance.