新增行之前，先处理一下，取消排序呗。如代码
dim t as table = tables("表A")For Each r As Row In t.rows r("_Sortkey") = r.indexNextt.sort = ""t.addnew
加好友 
发短信
Post By：2016/8/25 14:46:00 [显示全部帖子]
