I need the code to delete a record/row if cell Q (of that record/row) i
empty.

What would be the best way to achieve this?

Thanks,

Me

--
Metraza
-----------------------------------------------------------------------
Metrazal's Profile: http://www.excelforum.com/member.php...fo&userid=3164
View this thread: http://www.excelforum.com/showthread.php?threadid=51490

sub deleterow
dim cou as double
for cou = activesheet.usedrange.rows.count to 1 step-1
if activesheet.range("Q"&cou) = "" then _
activesheet.rows(cstr(cou)).delete
next
end sub
--
When you lose your mind, you free your life.
Ever Notice how we use '' for comments in our posts even if they aren''t
expected to go into the code?


"Metrazal" wrote:


I need the code to delete a record/row if cell Q (of that record/row) is
empty.

What would be the best way to achieve this?

Thanks,

Met


--
Metrazal
------------------------------------------------------------------------
Metrazal's Profile: http://www.excelforum.com/member.php...o&userid=31648
View this thread: http://www.excelforum.com/showthread...hreadid=514900

Try something like

Range("Q:Q").SpecialCells(xlCellTypeBlanks).Entire Row.Delete


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Metrazal"
wrote in
message
...

I need the code to delete a record/row if cell Q (of that
record/row) is
empty.

What would be the best way to achieve this?

Thanks,

Met


--
Metrazal
------------------------------------------------------------------------
Metrazal's Profile:
http://www.excelforum.com/member.php...o&userid=31648
View this thread:
http://www.excelforum.com/showthread...hreadid=514900

Same senerio except the cell is a zero value. Not empty
but 0.


Thanks in advance...

Met


--
Metrazal
------------------------------------------------------------------------
Metrazal's Profile: http://www.excelforum.com/member.php...o&userid=31648
View this thread: http://www.excelforum.com/showthread...hreadid=514900