Hi,

Suppose i hv a workbook with code in to generate Unique alphanumeric no
e.g. a unique Receipt voucher # for a Receipt voucher workbook which anybody
can save a copy & print.
I want to save the workbook as another workbook with only the copy of the
selected worksheet e.g Sheet1 & not other sheets in the original workbook &
OFCOURSE, I donot want the code written in original workbook to also get
saved in the copies.

I am having trouble using the function SaveAscopy in VBA as it saves exactly
a duplicate copy of the original workbook along with the code. bcos of which
each file has the original BIG filesize which i donot want.

is there a way to copy the contents of Sheet1 original workbook as a new
workbook with ONLY Sheet1 & without the code written inside.

Can I use .Copy to copy Selected contents of Worksheet1 of original workbook
as a new SMALL (KByte) size workbook with only workSheet1 & not with the
code written so that nobody else can use the new workbook to generate his
own autonumber but will have to use the original workbook to generate the
next unique aplhanumeric number .

Pls note that the coding is given in the POSTing "Unique Generated
Alphanumeric no.". any help to help me to improve the code will be really
appreciated, as i knw that i have md a lot of errors & want them rectified
before i can use it ofc to generate their own unique receipt voucher.

Thanks & regards

Eijaz



---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.564 / Virus Database: 356 - Release Date: 1/19/2004