how to unshare a excel worksheet using vbscript not using vba -

could please tell how unshare excel worksheet using vbscript , not using vba? tried following statement , not working:

if activeworkbook.multiuserediting activeworkbook.exclusiveaccess 

activeworkbook property of application object. in vba object implicitly used when omitted. in vbscript have explicitly use it:

set xl = createobject("excel.application") set wb = xl.workbooks.add  if xl.activeworkbook.multiuserediting xl.activeworkbook.exclusiveaccess 

you use workbook object assigned variable wb:

if wb.multiuserediting wb.exclusiveaccess