BeforeAddDataRow事件
Vars("暂停") = true
DataRowAdded
Vars("暂停") = false
DataColChanged
If Vars("暂停") = true Then return