围绕#error进行编码

时间:2012-10-05 16:16:47

标签: vba reporting-services

嗨我有2个细胞,里面有日期(Say Cell A和Cell B)。我想看看Cell A<单元格B.但是,单元格A有时可能是空白的。我想在其中忽略计算。

似乎SSRS会评估所有内容,即使它不在函数的逻辑步骤中,因为我编码的任何安全防护都会被忽略。因此,当Cell A为空时,我总是得到#error。

我尝试编写一些VB代码来进行此计算,因为我认为这样可以缓解这个问题。但是,使用以下功能会出现同样的问题:

Public Function CheckForError(ByVal Baseline as String, ByVal Current As String) As Boolean

If IsError(DateValue(Baseline)) Then
    Return False
Else 
    Return True
    End If
End Function

我的表达是这样的:

=Code.CheckForSlip(ReportItems("Milestone_Baseline_Date").Value, ReportItems("Milestone_Current_Date").Value)

我显然希望函数返回false而不是#error,但这种努力不起作用。

任何人都可以帮我吗?

由于

1 个答案:

答案 0 :(得分:1)

检查字符串长度不会返回null

Public Function CheckForError(ByVal Baseline as String, ByVal Current As String) As Boolean


If Len(Baseline) < 1 Then
    Return False
Else 
    Return True
    End If
End Function