以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 筛选取消后如何返回到所选行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=16513) |
-- 作者:zh91888 -- 发布时间:2012/2/16 12:02:00 -- 筛选取消后如何返回到所选行 数据有1W行 每次筛选取消后都会返回到第一行 然后还要向下寻找所要筛选的数据 请教是否有办法可以筛选取消后返回到所筛选的内容行?? 谢谢各位大师。。。
|
-- 作者:狐狸爸爸 -- 发布时间:2012/2/16 12:11:00 -- 目前没办法,除非自己做个取消筛选的按钮。 |
-- 作者:zh91888 -- 发布时间:2012/2/16 13:44:00 -- 狐爸您好~取消筛选按钮是否这样做? Tables("表A").ApplyFilter = False 但是按了以后好像还是退还到第一行,无法退还到筛选前的行数。。。还有否其他办法处理?谢谢狐爸
|
-- 作者:狐狸爸爸 -- 发布时间:2012/2/16 13:55:00 -- Dim dr As DataRow If Tables("xxx").Current IsNot Nothing Then dr= Tables("xxx").Current.DataRow End If Tables("xxx").ApplyFilter = False If dr IsNot Nothing Then Tables("xxx").Position = Tables("xxx").Findrow(dr) End If |