Hello Karen,
Sorry about that. I made a typo. I'll correct the post also.
Change that line to...
LastRow = .Cells(.Rows.Count, "D").End(xlUp).Row
Sincerely,
Leith Ross
--
Leith Ross
------------------------------------------------------------------------
Leith Ross's Profile:
http://www.excelforum.com/member.php...o&userid=18465
View this thread:
http://www.excelforum.com/showthread...hreadid=487498