So confused!!!
Posted by Don on April 21, 2001 6:12 PM
Hello, I recently made a document I will be using for making quotes. I want to be able to use this same sheet over and over and also have it be multiple pages. the entire document fits on one page but what if I run out of room on the first page and want to continue it on another page. the way I have it set up, I can only do one page at a time. I guess what I am asking is how do use the same page over and over again continually and save it as several pages rather then one at a time? Thank you for your time. Don
Posted by Marc on April 21, 2001 9:39 PM
Hi,Don Try this.
this will create a copy of sheet1 and save as
a cell reference,in my case a Quote Number.
then you can save the original intact
I don't know if that's what you wer looking
but here it is anyway
Marc
Sub saveme()
Sheets("Sheet1").Select
Sheets("Sheet1").copy
ActiveWorkbook.SaveAs Sheets("Sheet1").Range("I11").Value, FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
ActiveWorkbook.Close
Posted by Marc on April 21, 2001 9:42 PM
ActiveWorkbook.Close
Oupsss !!!
Forgot End Sub
Sheets("Sheet1").Select
Sheets("Sheet1").copy
ActiveWorkbook.SaveAs Sheets("Sheet1").Range("I11").Value, FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
ActiveWorkbook.Close
End Sub
Posted by Marc on April 21, 2001 9:47 PM
Bye the way credit goes to Dave Hawley Tahank's
Posted by anon on April 22, 2001 1:55 AM
Save your blank document as a template (.xlt) ??
