呃,测试没有任何问题。
Dim ss As String = "select top 100 * from {订单明细} where 1=2 order by [_Identify] desc"Tables("窗口1").Fill(ss, False)