Hi Jgp_2,
Try assigning code like the following to a button:
'=============>>
Public Sub Tester04()
ActiveSheet.Copy
ActiveWorkbook.SaveAs _
Filename:=("NewWorkbookName.xls"), _
FileFormat:=xlWorkbookNormal
End Sub
'<<=============
---
Regards,
Norman
"jgp_2" <
[email protected]> wrote in message
news:
[email protected]...
>
> Hello everybody.
>
> Hopefully someone can help me with this as I am stuck.(As usual)
>
> I want to add a command button to a report that when clicked will copy
> the sheet into a new book.
>
> I assume that this can be acheived throuch a Macro, but everything I've
> tried thus far has failed.
>
> Thanks for your help!
>
>
> --
> jgp_2
> ------------------------------------------------------------------------
> jgp_2's Profile:
> http://www.excelforum.com/member.php...o&userid=27624
> View this thread: http://www.excelforum.com/showthread...hreadid=489219
>
Bookmarks