参考
Tables("表A").TopVisibleRow = Tables("表A").Rows.count - 1
http://www.foxtable.com/help/topics/2358.htm