2010年9月10日金曜日

Reporting Services -除算エラー回避-

①レポートのプロパティより、コードを選択する。
 ※「レポートのプロパティ」はレポートの何もない所(背景青色部分)を右クリックして表示します
②右側のカスタムコード欄に下記コードを入力

Public Function Josan(ByVal Bunbo, ByVal Bunshi) As Object
 If IsNothing(Bunbo) Or IsNothing(Bunshi) Then
  Return Nothing
 ElseIf Bunbo = 0 Or Bunshi = 0 Then
  Return Nothing
 Else
  Return Bunshi / Bunbo
 End If
End Function

③呼び出し方法は下記の通り。
 =Code.Josan(Sum(Fields!分母.Value), Sum(Fields!分子.Value)

ちなみに、式でIIF関数を使っても可能ですが、カスタムコードを使ったほうがスッキリします。

1 件のコメント:

  1. 助かりました!!ありがとうございます

    返信削除