ACCESS 日付が変わった場所で改ページしたい
Win 7
Access2013
大変、お世話になっています。よろしくお願いしたいと思います。
日程表で、詳細に「日付」「場所」「時間」「内容」などのフィールドがありＡ５の用紙に印字しています。1枚の用紙に収まらない場合、2枚目に順次印字されています。
この2枚目に移る時、「日付」が変わった時点で改ページをしたいのです。「日付」は日が変わった時だけ入力しています。
色々、調べてみて、グループ化もしてみましたがうまく出来ませんでした。「グループ化」の中で、印字の時の「グループ全体」という項目が Access2013では見当たりませんでした。
何卒、ご教示方よろしくお願いいたします。
【備考】
モジュールには、ここでご教示いただいた下記のような「線」の記述をしています。
Option Compare Database
Option Explicit
Dim HI As String
Dim TI As String
Dim NAIYO As String
Private Sub ページヘッダーセクション_Format(Cancel As Integer, FormatCount As Integer)
HI = """"
TI = """"
NAIYO = """"
End Sub
Private Sub 詳細_Format(Cancel As Integer, FormatCount As Integer)
If HI <> Me.行程_日付 Then
Me.直線51.Visible = True
HI = Me.行程_日付
Else
Me.直線51.Visible = False
End If
If TI <> Me.テキスト44 Then
Me.直線53.Visible = True
TI = Me.テキスト44
Else
Me.直線53.Visible = False
End If
If NAIYO <> Me.内容 Then
Me.直線55.Visible = True
NAIYO = Me.内容
Else
Me.直線55.Visible = False
End If
End Sub
Private Sub 詳細_Print(Cancel As Integer, PrintCount As Integer)
Me.ScaleMode = 1
Me.ForeColor = 0
Me.DrawStyle = 0
Me.DrawWidth = 4
Me.Line (1.51 * 567, 0)-(1.51 * 567, 14400)
Me.Line (6.8 * 567, 0)-(6.8 * 567, 14400)
Me.Line (8.3 * 567, 0)-(8.3 * 567, 14440)
End Sub
お礼
はい、項目や自分で直接かいた線は表示されます。 ２ページ目以降なので数値を大きくしてみても表示されなかったり、一ページ目に表示されたりします。 たとえば、 Me.Line (0.3 * 567, 130000)-(0.3 * 567, 200000) としても、１ページ目に線が表示されてしまいます。