做个按钮吧:(先在命令窗口测试)
Tables("表A").Rows(Tables("表A").count(True) -1, True)("完成率") = Tables("表A").Compute("Sum(完成率)") /Tables("表A").count-1