Many thanks.

Regards.

"Jim Rech" wrote in message
...
Try getting the number of lines to copy like this:

NumberOfLines = SourceCodeModule.CountOfLines - StartCopyLine

--
Jim Rech
Excel MVP




---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.786 / Virus Database: 532 - Release Date: 29/10/2004