Create Workbook - Single sheet

In some case if you wnat to copy some cell values to a new workbook, in that case you dont want to create a workbook with three sheets(by default), create a workbook with single sheet using the code
------------ ' Workbooks.Add(xlWBATWorksheet) '---------------
this code create a workbook with single sheet.