我有一个简单的功能,可以根据整数值设置单元格的背景颜色。当我从字段传递一个值时,它正常工作,但是当我尝试从表达式传递一个值时,它不起作用。
Public Function GetColor(ByVal Percentage As Double) As String
Dim returnValue As String
Select Case Percentage
Case Is < 10
returnValue = "No Color"
Case Is < 20
returnValue = "Orange"
Case Is >= 20
returnValue = "Red"
End Select
Return returnValue
End Function
表达式是:
=Code.GetColor((Fields!Total.Value/sum(Fields!Total.Value, "mainDataSetQuery")))
其中“mainDataSetQuery是数据集而不是组。
这有效,但显然不是我想要的:
=Code.GetColor(Fields!Total.Value)
答案 0 :(得分:0)
试试这个表达式:
= Code.GetColor((Fields!Total.Value / First(Fields!Total.Value,“mainDataSetQuery”)))