Microsoft Access Club >Access裏技Tips >このページ >次頁 < 前項 サイト内検索


ページフッターにページ毎の集計値を表示する : Access裏技Tips



レポートのページフッターで集計を行うことはできませんが、複数ページにわたる場合などページ小計があれば便利です。 ここでは、ページフッターのテキストボックスに詳細セクションのデータを次々と加算していくことで小計を表示する技を紹介します。

ページフッターにページ小計の表示

  1. サンプルテーブル(tbl_sample)をもとにして、「請求月別及び取り引き先別集計リスト」の 帳票レポート(rpt_sample)を作成します。
  2. このレポートには、ページフッターセクションにページ別売上額小計を表示するテキストボックス(txtPageCount)を作成します。
  3. 詳細セクションのフォーマット時イベントプロシージャを作成し、詳細セクションのテキストボックスの値を次々と加算していきます。

「請求月別及び取り引き先別集計リスト」の レポートの作成

  1. 「請求月別及び取り引き先別集計リスト」の レポートを作成します。
  2. サンプルデータを元に、請求月別及び取り引き先別集計リストを作成します。

  1. ページフッターにページごとの小計を表示するテキストボックス(txtPageCount)と、総計を表示するテキストボックス(txtTotalCount)を作成します。
  2. txtTotalCountは可視プロパティを いいえ に変更します。
  3. ページフッターに2個のテキストボックス(txtpage、txtpages)を作成します。
  4. txtpageのコントロールソースに = [Page]&" /" 、txtpagesのコントロールソースに = [Pages]を記載し、レポートのページ番号と総ページ数を求めます。
  5. ページフッターにテキストボックス(txtReportCount)を作成し、可視プロパティを いいえ に変更します。
  6. このテキストボックスのコントロールソースに =Sum([請求額]) を記載します。
  7. 請求額は小計を求めるコントロールソース名で、総計を求めます。

ページヘッダーセクションのフォーマット時イベントプロシージャの作成

ページヘッダーセクションのフォーマット時イベントプロシージャを作成します。

Private Sub ページヘッダーセクション_Format(Cancel As Integer, _
							FormatCount As Integer)

    Me.txtPageCount = 0 ' --- A
    
    If Me.Page = Me.txtpages Then
        Me.txtTotalCount.Visible = True ' --- B
    Else
        Me.txtTotalCount.Visible = False
    End If
    
End Sub
解説
  1. ページが切り替わるごとに、小計を求めるテキストボックス(txtPageCount)を初期化します。
  2. IFステートメントを用いて、最後のページ(Me.Page = Me.txtpages)であれば総合計を求めるテキストボックス(txtTotalCount)の可視プロパティを はい に切り替えます。

詳細セクションのフォーマット時イベントプロシージャの作成

詳細セクションの印刷時イベントプロシージャを作成します。

Private Sub 詳細_Print(Cancel As Integer, FormatCount As Integer)

    Me.txtPageCount = Me.txtPageCount + txt請求額 ' --- A

End Sub
解説
  1. ページごとの小計を表示するテキストボックス(txtPageCount)に、txt請求額テキストボックスの値を加算していきます。
今回のおすすめポイント

A = A + B

プロシージャ内で、A = A + B と記述すると、Aの値にBの値を加算します。つまり、左辺のAの値に右辺の(Aの値+Bの値)を代入するという意味です。

動作確認

  1. レポートを印刷プレビューで開きます。
  2. 1ページ目(下図)

  1. 最終ページ(下図)

関連ページ

ページの先頭へ 前ページへ戻る

 


ページフッターにページ毎の集計値を表示する : Access裏技Tips


 

-Microsoft Access Club-

cPanel管理者用コンパネWHMの操作管理手順を発信しています。
cPanel管理者用コンパネ「WHM」の操作管理手順を発信中・・・。