1

我有一个简单的函数,用于根据整数值设置单元格的背景颜色。当我从字段中传递一个值时,它可以正常工作,但是当我尝试从表达式中传递一个值时,它不起作用。

    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)
4

1 回答 1

0

试试这个表达式:

=Code.GetColor((Fields!Total.Value/First(Fields!Total.Value, "mainDataSetQuery")))

于 2012-11-19T14:53:02.590 回答