主题：[求助]关于符合条件自动勾选复选框

任意事件执行下面代码

If Tables.Contains("表A") Then
    For Each r As Row In Tables("表A").Rows
        If r("第二列") > 0 Then
            r.Checked = True
        End If
    Next
End If