Home > 即効テクニック > AccessVBA > フォーム・レポート > 1レコードの情報が2ページにまたがらないようにする

即効テクニック

フォーム・レポート

1レコードの情報が2ページにまたがらないようにする

(Access 2000/2002/2003)
● 概要 ●
構文  expression.KeepTogether


設定項目        内容
expression	GroupLevelオブジェクトまたはSectionオブジェクト[省略不可]

帳票形式のレポートを印刷する場合、1つのレコードが2ページにまたがって印刷されることがあります。
KeepTogetherプロパティの値をTrueに設定すると、1レコードを現在のページに印刷しきれない場合、そのレコードを次のページの先頭から印刷します。
既定値はFalseです。Falseの場合は、1レコードがページ内に収まらない場合、残りの部分を次のページに印刷します。


● サンプル ●
Sub KeepTogetherSample()
    '[06]レポートをデザインビューで開く
    DoCmd.OpenReport "06", acViewDesign
    '詳細セクションの[同一ページ印刷]プロパティをTrueに設定
    Report_06.詳細.KeepTogether = True
    '[06]レポートを印刷プレビューで開く
    DoCmd.OpenReport "06", acViewPreview
End Sub