こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

ACCESSレポートのヘッダー表示の切り替えテクニック

ACCESS(2002)のレポートで下記のように担当者別に担当者が購入した商品の明細リストを印刷したいと思います。

通常なら、担当者のグループヘッダーを作成し、詳細セクションに明細デーを表示させればOKなのですが、今回は、そのヘッダーの内容を「1ページ目(●Aを表示)」と「2ページ目以降(★Bを表示)」で異なる内容にしたいのです。
何か良い方法があれば教えて下さい!

(補足1)
担当者が変われば、1ページ目は●Aの表示に戻し、2ページ目以降は★Bの表示とします。

(補足2)
★Bの表示領域は●Aよりも狭いです。つまり、2ページ目以降は1ページ目よりも明細が多く表示されます。


┌───────┐P1-1
 (担当1)太郎
 ●ヘッダーA●
  1.aaa
  2.bbb
  3.ccc
└───────┘

┌───────┐P1-2
 (担当1)太郎
 ★ヘッダーB★
  4.ddd
  5.eee
  6.fff
  7.yyy
└───────┘

┌───────┐P1-3
 (担当1)太郎
 ★ヘッダーB★
  8.hhh
  9.eee
  10.aaa
  11.ttt
└───────┘

┌───────┐P2-1
 (担当2)花子
 ●ヘッダーA●
  1.xxx
  2.yyy
  3.ccc
└───────┘

┌───────┐P2-2
 (担当2)花子
 ★タイトルB★
  4.jjj
  5.eee
  6.kkk
  7.ppp
└───────┘

投稿日時 - 2004-01-23 19:07:11

QNo.759073

すぐに回答ほしいです

質問者が選んだベストアンサー

こんばんは!
とりあえず以下の通りでどうでしょう?
1.担当者のグループヘッダーを2つ作成する。
2.上側の担当者ヘッダーの名前をヘッダーAとする。
3.下側の担当者ヘッダーの名前をヘッダーBとする。
4.ヘッダーBのセクション繰り返しを”はい”にする。
5.ヘッダーAのフォーマット時イベント
Private Sub ヘッダーA_Format(Cancel As Integer, FormatCount As Integer)
Me.Page = 1
End Sub
6.ヘッダーBのフォーマット時イベント
Private Sub ヘッダーB_Format(Cancel As Integer, FormatCount As Integer)
If Me.Page = 1 Then
Me.ヘッダーB.Visible = False
Else
Me.ヘッダーB.Visible = True
End If
End Sub
7.グループフッターAの改ページ=カレント セクションの後

投稿日時 - 2004-01-24 00:06:23

補足

早速、ACCESS(2002)で試してみました。

>7.グループフッターAの改ページ=カレント セクションの後

これだと明細が2ページ目から表示されたので、"セクションの前" に変更すると1ページ目から表示されました。

ただ、ヘッダーBが表示されません。
どうも、 "Me.ヘッダーB.Visible = False" とした時に、セクション繰り返しが”いいえ”になっているような...?

試しに、ACCESS(2000)の方で実行すると上手くいきました。 これってバグなんでしょうか?
業務としては ACCESS(2002)で使用したいのですが....

投稿日時 - 2004-01-24 13:59:10

お礼

ご回答ありがとうございます。
さっそく試してみます。

投稿日時 - 2004-01-24 13:35:47

ANo.1

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(2)

ANo.2

o23

Access2002でもこのあたりは変わらないだろうと思ったのですが、だめですか・・・
バグなのか?仕様の変更なのか?
ヘッダーの可視・不可視ではなくコントロールひとつづつやってみるとかではどうなんでしょう。

投稿日時 - 2004-01-26 10:04:00

お礼

ありがとうございました。
もう少し調査してみます。

投稿日時 - 2004-01-26 13:06:45

あなたにオススメの質問