不论两表是否关联,只要B表的某一列与A表的某一列类型相同,且是多对一的关系,因为不一定要复选B表中的所有行,最好加上条件判断:
在A表的AfterCheckRow事件中,代码如下:
For Each r As Row In Tables("B表").Rows If r("编号") = e.Row("编号") Then r.Checked = e.Row.Checked Else Continue For End IfNext