初めて質問致します。
VB6＋ActiveReportsを利用して帳票作成を行っておりますが、プレビュー画面から印刷設定画面を表示した際、ページ指定の範囲がプレビューしたページの半分で設定されてしまいます。解決方法が無いかご支援のほどよろしくお願い致します。
■使用環境
Active Reports Ver2.0J SP1
Visual Basic 6 SP6
■問い合わせ内容
ナレッジベース文書番号:10913「異なるデザインの複数のレポート（表紙と内容など）を合成して、一つのレポートにする方法は？」（https://www.grapecity.com/tools/support/technical/knowledge_detail.asp?id=10913）を参考に、"請求書"というレポートと"請求書(控)"というレポート（レポートタイトル以外は同じ内容のレポート）をPagesコレクションのInsertメソッドを使用して巻末に合成するVB6
+ Active Reports Ver2.0Jベースのアプリを作成しました。
レポートの合成はできており、印刷プレビューでの表示とプリンターへの印刷は"請求書"、"請求書(控)"とも全ページ行えています。
ですが、プリンタ設定のダイアログでデフォルト表示されている印刷条件のページ指定が「1-xx」※xxは請求書(控)を含まないページ数となってしまいます。 「すべて」のラジオボタンを選ぶか、ページ指定のxxを請求書(控)を含んだページ数に変えてから印刷すれば印刷自体は行えますが、使い勝手が良くないので、プロパティ等で以下(1)、(2)の何れかに設定する方法がないかを問い合わせさせて頂きます。
(1)ラジオボタンが印刷範囲「ページ指定 1-最終頁」
(2)ラジオボタンが印刷範囲「すべて」
■参考資料
（以下はVB6ソースの抜粋になります）
'変数定義
Private g_repMain As repSZP0380 '請求書
Private g_repMain2 As repSZP0380 '請求書（控）
'処理抜粋
Dim w_lCnt
Dim w_oRec
(省略)
'■アクティブレポートの編集処理 請求書の編集
w_oRec.MoveLast
w_oRec.MoveFirst
g_repMain.dcRptData.MaxRows = w_oRec.RecordCount
Set g_repMain.dcRptData.Recordset = w_oRec
g_repMain.m_sRepTitle = "請 求 書"
g_repMain.Run False
'■アクティブレポートの編集処理 請求書(控)の編集
w_oRec.MoveLast
w_oRec.MoveFirst
g_repMain2.dcRptData.MaxRows = w_oRec.RecordCount
Set g_repMain2.dcRptData.Recordset = w_oRec
g_repMain2.m_sRepTitle = "請 求 書 （控）"
g_repMain2.Run False
'■請求書の巻末に請求書（控）を合成
For w_lCnt = 0 To g_repMain2.Pages.Count - 1
g_repMain.Pages.Insert g_repMain.Pages.Count, g_repMain2.Pages(w_lCnt)
DoEvents
Next
(省略)
以上 よろしくお願い致します。
