Hi Leigh
Thanks for the info (Good assumption - yes it was columns A to G)
I have copied and pasted your code into a new module, but when I try to
run the macro I get a run time error '13', type mismatch
If I click on debug this is the line that is highlighted
LastRow = .Cells(.Rows.Count, "D").End(xlUp)
Are you able to shed any light on this ?
Thanks
Karen
--
ksp
------------------------------------------------------------------------
ksp's Profile:
http://www.excelforum.com/member.php...fo&userid=6267
View this thread:
http://www.excelforum.com/showthread...hreadid=487498