Table没有select方法,只有DataTable有
trs1=Tables("模式窗-导入订单_table1").DataTable.Select("订单ID/采购单ID = '" & tr1("订单ID/采购单ID") & "'")