如果追求效率,不要在事件里面处理。建议做一个【自动编号】按钮,点击一下的时候自动编号,参考代码
For Each r As Row In CurrentTable.Rows r("第一列") = r.Index + 1Next