补充:
表属性AfterEdit设置
If e.Col.Name = "B" Then ‘'如果是B列的内容变动
If e.Row.IsNull("A") Then ‘'如果A列为空
e.Row("B") = Nothing ‘那么清除B列内容
Else
e.Row("B") = e.Row("A") & "指标" & e.Row("B") ‘否则B列等于 “A列+指标+B列”
End If