Access レポート 数値計算の箇所で#エラー、#Size →IsError関数を利用

Question

Accessでレポートとサブレポートを利用しています。
会議室名1ごとの備品金額の合計を出しています。
備品の無い会議室の場合、
※に「=[Reports]![レポートA]![サブレポートA].[Report]![備品合計]」
と指定すると「#エラー!」が表示されます。
「=Nz([Reports]![レポートA]![サブレポートA].[Report]![備品合計],0)」
に変更すると「#Size」となります。そこで、
「=IIf(IsError([Reports]![レポートA]![サブレポートA].[Report]![備品合計]),0,[Reports]![レポートA]![サブレポートA].[Report]![備品合計])」
とすると想定した通りに動きました。
しかし、記述がとても長くなり見づらいです。
表記を短くする方法や、より簡単に表現できる関数（Nz関数のような）は無いでしょうか。よろしくお願いします。

レポートA

会議室名1	備品金額合計
A	※
B	※
C	※

サブレポートA
会議室名1でグループ化し、会議室名1それぞれで金額を合計する＝テキストボックス「備品合計」に代入

会議室名1	備品	金額
A	椅子	10000
A	机	5000
B	椅子	8000
B	机	4000

Answer 1

メインレポートからサブレポートを参照するとき[Reports]![レポートA]![サブレポートA].[Report]![備品合計]としなくても、[サブレポートA]![備品合計]で参照できるので、

=IIf(IsError([サブレポートA]![備品合計]),0,[サブレポートA]![備品合計])

と少し簡単にできます。

あるいは、
=[サブレポートA]![備品合計]のテキストボックスを「可視: いいえ」「名前: 備品合計」として、別にテキストボックスを配置して、下記のように設定してもいいですね。

=IIf(IsError([備品合計]),0,[備品合計])

---

あとは、ユーザー定義関数を作成するぐらいかな。

標準モジュール

Public Function EZ(Value, ValueError)
    If IsError(Value) Then
        EZ = ValueError
    Else
        EZ = Value
    End If
End Function

メインレポートのテキストボックスのコントロールソース

=EZ([サブレポートA]![備品合計],0)

Comments

[mnbwqz]

ご回答ありがとうございます。
１番目の案、大幅に短くすることができました。
[Reports]![レポートA]!
.[Report]
省略できるのですね。
Meでうまくいかず困っていました。
フォームとサブフォームの時にも参考にします。

２番目の案、サブレポートを利用しない場合と同じくらいに
短くできますね。サブレポート名やテキスト名が長くなる場合、
条件式が複雑になる場合に利用しようと思います。

３番目の案、関数はこういう場合に使うことができるのですね。
参考になります。引数や戻り値の設定の仕方も今後必要な時に
利用させていただきます。ありがとうございます。