主题：如果某列的单元格的值的数字大于1，那么该行的颜色背景色用特殊颜色标记出来，这个该怎么做

bin,我这个为什么不对，

我把这些放在AFTERALOAD里

Dim r As Row
With Tables("窗口意向管理_tblYixiangguanli")
    For i As Integer = 0 To .Rows.Count - 1
        r = .Rows(i)
        If r("外勤数量") = 0  Then
        DataTables("crm_opportunity").SysStyles("CurrentRow").BackColor = Color.red    
    End If
    Next
End With

我只想把窗口中的显示的行的复合条件的列标记出来，而不是整个表。