VB中不引用EXCEL版本时出错!

Question

 'Dim XlsApp As New Excel.Application
   ' Dim XlsSheet As New Excel.Worksheet
   ' Dim XlsBook As New Excel.Workbook
    'Set XlsApp = New Excel.Application
      ' Set XlsBook = XlsApp.Workbooks.Open(D:\测风塔方位.xls)
        'Set XlsSheet = XlsBook.Worksheets(2)
 上面是引用Microsoft Excel11.0 ObjectLibrary,运行没问题。但是下面不引用出错。
Dim XlsApp As Object
     Dim XlsBook As Object
     Dim XlsSheet As Object
     
     Set xlApp = CreateObject("excel.application")
     Set XlsBook = XlsApp.Workbooks.Open("D:\测风塔方位.xls")、这行出错“对象变量或with未设置”
     Set XlsSheet = xlBook.Worksheet(1)
        
请各位高手解决。
由于EXCEL有很多版本，所以不想用引用。不知还有什么解决办法.

Answer 1

参考 
http://topic.csdn.net/t/20050810/20/4201549.html

Answer 2

set XlsBook=CreateOjbect("Excel.Workbook")
Set XlsBook = XlsApp.Workbooks.Open("D:\测风塔方位.xls")、这行出错“对象变量或with未设置”