Hi Elaine,

Try:

'=============>>
Public Sub Test()
Sheets("SheetA").Copy After:=Sheets(Sheets.Count)
End Sub
'<<=============



---
Regards,
Norman



"elaine" <elaine216@gmail.com> wrote in message
news:1150987972.065032.16710@y41g2000cwy.googlegroups.com...
> Hello,
>
> Does anyone knows how to copy a command button to new worksheet?
>
> I am a beginner and want to do things more effective, cos I have to
> fill in different information in the same template but split across the
> sheet.
>
> eg.
>
> I create a template in Sheet A and I have asign a macro (to copy the
> whole sheet and insert a new sheet) to a command button.
>
> Private Sub test()
> Cells.Select
> Selection.Copy
> Sheets("Sheet1").Select
> Sheets.Add
> ActiveSheet.Paste
> End Sub
>
> When I click on that command button in sheet A, it will copy the whole
> sheet A to a new sheet.
>
> However the command button is not on the new sheet. (but still)
>
> Is there a way to copy and paste the command button too, so that there
> will always be a command button in the new sheet?
>
> Thanks.
>
> Elaine.
>