A workbook is made up of many worksheets. So when you say that a worksheet is a workbook
then you ask for trouble.

--
HTH. Best wishes Harald
Excel MVP

Followup to newsgroup only please.

"S. Daum" wrote in message
...

Dim xs as Excel.Worksheet
Set xs = Application.Workbooks("MyCodeWorkBook.xls")