I have, as part of a project, a print form I want to save as a separate file
without losing focus on the original. Can anyone help?

On May 5, 12:12*pm, vbnewbie
wrote:
I have, as part of a project, a print form I want to save as a separate file
without losing focus on the original. Can anyone help?

I'm not exactly sure how you want the data to be copied, but there is
sample code below of how to copy the active sheet to a new workbook
and open the save as dialog box to save the newly created workbook.

Best,

Matthew Herbert

Sub SaveWorksheet()
Dim Wks As Worksheet
Dim wksCopy As Worksheet
Dim Wkb As Workbook
Dim strFileName As String

Set Wks = ActiveSheet
Set Wkb = Workbooks.Add

'copy the worksheet to a new workbook
Wks.Copy After:=Wkb.Sheets(Wkb.Sheets.Count)

'save the file
strFileName = Application.GetSaveAsFilename()
If strFileName Then
Wkb.SaveAs strFileName
End If

End Sub

What's a "print form" ?

To do what your subject line implies, simply

ActiveSheet.Copy

This will create a new file, save it as required, and close it.

Regards,
Peter T

"vbnewbie" wrote in message
...
I have, as part of a project, a print form I want to save as a separate
file
without losing focus on the original. Can anyone help?

This should get you started:
http://www.rondebruin.nl/copy6.htm

Post back if you have specific questions.

HTH,
Ryan---

--
Ryan---
If this information was helpful, please indicate this by clicking ''Yes''.


"Peter T" wrote:

What's a "print form" ?

To do what your subject line implies, simply

ActiveSheet.Copy

This will create a new file, save it as required, and close it.

Regards,
Peter T

"vbnewbie" wrote in message
...
I have, as part of a project, a print form I want to save as a separate
file
without losing focus on the original. Can anyone help?

"ryguy7272" wrote:

This should get you started:
http://www.rondebruin.nl/copy6.htm

Post back if you have specific questions.

HTH,
Ryan---

--
Ryan---
If this information was helpful, please indicate this by clicking ''Yes''.


"Peter T" wrote:

What's a "print form" ?

To do what your subject line implies, simply

ActiveSheet.Copy

This will create a new file, save it as required, and close it.

Regards,
Peter T

"vbnewbie" wrote in message
...
I have, as part of a project, a print form I want to save as a separate
file
without losing focus on the original. Can anyone help?

Ryan

Really Useful - Thankyou! my problem is no longer a problem

Cheers

Pete

"ryguy7272" wrote:

This should get you started:
http://www.rondebruin.nl/copy6.htm

Post back if you have specific questions.

HTH,
Ryan---

--
Ryan---
If this information was helpful, please indicate this by clicking ''Yes''.


"Peter T" wrote:

What's a "print form" ?

To do what your subject line implies, simply

ActiveSheet.Copy

This will create a new file, save it as required, and close it.

Regards,
Peter T

"vbnewbie" wrote in message
...
I have, as part of a project, a print form I want to save as a separate
file
without losing focus on the original. Can anyone help?