Option Explicit
Sub testem()
With Sheets
.Item(.Count).Copy _
after:=.Item(.Count)
End With
End Sub


Bill_S wrote:

I need a macro to copy the last sheet in my workbook and put the copy at the
very end of the workbook, in effect it becomes the new last sheet. Thanks

--

Dave Peterson