将DAO.RecordSet导出到XLS文件

Question

我正在尝试将recordset导出到（新）excel文件，但是收到有关无效参数的错误：

dim rs as DAO.Recordset
set rs=db.openrecordset(SELECT * from tblTest where NEW='YES')

DoCmd.TransferSpreadsheet _
   TransferType:=acExport, _
   SpreadsheetType:=acSpreadsheetTypeExce12Xml, _
   TableName:=rs, _
   HasFieldNames:=True

  

错误： 2498 - 您输入的表达式是其中一个参数的错误数据类型。