FetchedRowOverflow 属性

       

如果上次使用 Refresh 方法返回的行数比工作表中可用行数大,则该值为 TrueBoolean 类型,只读。

示例

本示例对第一张查询表进行刷新。如果由查询返回的行数超过工作表中的可用行数,则显示一条错误消息。

With Worksheets(1).QueryTables(1)
    .Refresh
    If .FetchedRowOverflow Then
        MsgBox "Query too large: please redefine."
    End If
End With