activesheet.move after:=sheets(sheets.Count)

--
HTH

Bob Phillips

"Greg" wrote in message
...
What is the code to move the current worksheet to the end of a workbook.

Thanks in advance

Greg