如何基于不同值为多列批量应用相同背景颜色条件格式

一、通过自定义代码实现动态字段判断 #

在报表的「报表属性」→「代码」面板中添加以下VB.NET代码，实现自动识别当前单元格绑定的字段，并按规则判断是否需要高亮：

Function IsCurrentFieldEmpty(ByVal currentItem As Object, ByVal dataRow As Object) As Boolean
    ' 获取当前单元格绑定的字段名
    Dim fieldName As String = DirectCast(currentItem, Microsoft.ReportingServices.ReportProcessing.RenderingObjectModel.TextBox).DataElementName
    ' 读取对应字段的值
    Dim fieldValue As Object = dataRow.GetType().GetProperty(fieldName).GetValue(dataRow, Nothing)
    ' 判断是否为空/Null
    Return IsDBNull(fieldValue) OrElse fieldValue Is Nothing
End Function

Function NeedHighlight(ByVal currentItem As Object, ByVal dataRow As Object, ByVal programVal As String) As Boolean
    ' 定义Program为'B'时需要高亮的特定列名，替换成你的实际列名
    Dim targetCols As String() = {"OrderID", "CustomerName", "TotalAmount"}
    Dim currentField As String = DirectCast(currentItem, Microsoft.ReportingServices.ReportProcessing.RenderingObjectModel.TextBox).DataElementName

    Select Case programVal
        Case "A"
            ' Program为A时，所有空值列高亮
            Return IsCurrentFieldEmpty(currentItem, dataRow)
        Case "B"
            ' Program为B时，仅特定列空值高亮
            Return Array.IndexOf(targetCols, currentField) >= 0 AndAlso IsCurrentFieldEmpty(currentItem, dataRow)
        Case Else
            ' 其他情况不高亮
            Return False
    End Select
End Function

二、批量设置单元格背景色表达式 #

1. 按住Ctrl或Shift批量选中所有需要设置格式的单元格
2. 打开「属性」面板→「填充」→「背景色」，输入以下表达式：

=IIf(Code.NeedHighlight(ReportItem, Fields, Fields!Program.Value), "Orange", Nothing)

三、关键注意事项 #

• 确保所有目标单元格的「数据元素名称」（DataElementName）和数据源中的字段名完全一致，否则代码无法正确识别字段
• 按需修改targetCols数组中的列名，保证和实际需要高亮的列匹配
• 若使用非SSRS的报表工具，需微调代码中的对象类型，但核心逻辑通用

内容的提问来源于stack exchange，提问作者ANich