メールマガジン【アクセスで作るシリーズ】
バックナンバー 【住所録ソフト編】 Vol.33
■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□
ＡＣＣＥＳＳで作るシリーズ 【住所録ソフト編】
発 行 ： Yoshihisa Fukuda 2002.09.21 Vol.33
■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
今回は、宛名印刷のレポート修正です。
印刷条件設定画面で指定された条件に基づいて宛名印刷するようにします。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
□ 宛名印刷レポートの元クエリー[LetterAddrPrint]を修正する。
１．住所録ソフトのデータベース[Address.mdb]を開きます。
２．データベースウィンドウの[クエリー]タブを選択します。
３．宛名印刷レポートの元クエリー[LetterAddrPrint]を選択し、[デザイン]ボタン
を押下してクエリービルダを開きます。
４．まず、以前に作成した時、追加した[JointlyTable]を以下の手順で削除します。
（１）上段の[JointlyTable]テーブルをマウスでクリックして選択します。
（２）メニューの[クエリー]-[テーブルの削除]を選択します。
５．クエリービルダーの上段にある[AddressTable]の[PrintAddr]と[PrintJointly]
をダブルクリックして、下段のフィールドに追加します。
６．追加した[PrintAddr]フィールドの抽出条件に[<3]と設定します。
７．クエリーを保存してクエリービルダを終了します。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
□ 宛名印刷レポートの修正する。
１．データベースウィンドウの[レポート]タブを選択します。
２．宛名印刷レポート[LetterAddrPrint]を選択し、[デザイン]ボタンを押下して
デザインウィンドウを開きます。
３．[詳細]セクションを選択し、[フォーマット時]プロパティにカーソルを移動して
右端の[...]ボタンを押下します。
４．Private Sub Detail_Format サブルーチンに、以前に記述したコードがあると
思いますが、それらのコードを以下の様に書き換えます。
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim StrAddr As String
If Me.PrintAddr = 1 Then
StrAddr = StrConv(Me.Address, vbWide)
Me.tbound3.Visible = False
Me.tbound4.Visible = False
Else
StrAddr = StrConv(Me.OfficeAddress, vbWide)
Me.tbound3.Visible = True
Me.tbound4.Visible = True
End If
Me.Address_sub1 = AddrConv(StrAddr)
End Sub
５．ここまで出来たら、一度レポートを保存して終了します。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
□ 宛名印刷レポートをプレビューで確認する。
ここで一度、宛名印刷のレポートを確認します。
住所フォームで適当にデータを入力して、宛名印刷条件設定画面を開きます。
登録したデータが一覧表示されるので、住所の自宅、会社、印刷しないを指定して
[印刷]ボタンを押下します。
自宅住所を指定したデータは、住所欄に自宅住所が表示され、会社名、部署名は表示
されません。
会社住所を指定したデータは、住所欄に会社住所が表示され、会社名、部署名も表示
されます。
印刷しないを指定したデータは表示されません。
ここで、気付かれた方もいらっしゃると思いますが、アクセス９７のレポートは、
[はがきウィザード]で作成したにも拘らず、用紙サイズがＡ４になっています。
ここで、用紙の指定方法について少し触れておきましょう。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
□ 宛名印刷レポートの用紙設定を行う。
１．宛名印刷レポートをデザインで開きます。
２．メニューの[ファイル]-[ページ設定]を選択します。
３．ページ設定のダイアログには、[余白][ページ][レイアウト]の３つのタブが
ありますが、まず[ページ]タブを選択します。
４．[印刷の向き]は[縦]のままで構いません。
[用紙サイズ]のコンボボックスの[はがき]を選択します。
※この[用紙サイズ]のコンボボックスの内容は、ご使用のプリンタに依存します。
大抵のプリンタには、[はがき]があると思いますが、[はがき]が無いプリンタ
でどうしても印刷したい場合、[ユーザー定義]等で、はがきのサイズ(100×148mm)
を指定します。
５．次に、余白の設定を行います。
[余白]タブを選択し、余白（上、下、右、左）を指定します。
この余白の最小値も、プリンタに依存します。
余白とレポートのデザインの縦横サイズの合計は、はがきのサイズより小さく
しないと、ページをはみ出し、途中で改ページしてしまいます。
レポートのデザインの縦横サイズは、[レイアウト]タブの真ん中の[サイズ]に
幅と高さで指定されています。
実際には、
はがきの縦の長さ(148mm)＞[レイアウト]タブのサイズの[幅]＋上余白＋下余白
はがきの横の長さ(100mm)＞[レイアウト]タブのサイズの[高さ]＋左余白＋右余白
となっていなければいけません。
６．レイアウトのサイズ＋余白は、少し小さめにしておくと、郵便番号の印字位置の
微調整が余白で調整できるので良いと思います。
次回は、宛名印刷レポートの続きで、連名の印刷、その他細かな調整を行います。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□
◇ ACCESSで作るシリーズ 【住所録ソフト編】
◇ 発 行 元 ：Yoshihisa Fukuda（福田 義久）
◇ ご意見・ご要望
ご質問等 ：fukud@nifty.com
◇ このメールマガジンは、インターネットの本屋さん『まぐまぐ』を利用して発行
しています。（まぐまぐID:0000077071)
◇ バックナンバー：http://homepage2.nifty.com/f-soft/
◇ 登録・解除 ：http://homepage2.nifty.com/f-soft/
Copyright(C) 2001-2002 Yoshihisa Fukuda All rights reserved.
◇転載について
このメールマガジンの無断転載などは、一切禁止です。
転載をご希望の方は、事前にメールで連絡をください。
◇免責
このメールマガジン及びホームページの内容による、いかなる損害、障害などに
関して発行者は一切の責任を負いません。
掲載広告についても同様です。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□
ＡＣＣＥＳＳで作るシリーズ 【住所録ソフト編】
発 行 ： Yoshihisa Fukuda 2002.09.21 Vol.33
■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
今回は、宛名印刷のレポート修正です。
印刷条件設定画面で指定された条件に基づいて宛名印刷するようにします。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
□ 宛名印刷レポートの元クエリー[LetterAddrPrint]を修正する。
１．住所録ソフトのデータベース[Address.mdb]を開きます。
２．データベースウィンドウの[クエリー]タブを選択します。
３．宛名印刷レポートの元クエリー[LetterAddrPrint]を選択し、[デザイン]ボタン
を押下してクエリービルダを開きます。
４．まず、以前に作成した時、追加した[JointlyTable]を以下の手順で削除します。
（１）上段の[JointlyTable]テーブルをマウスでクリックして選択します。
（２）メニューの[クエリー]-[テーブルの削除]を選択します。
５．クエリービルダーの上段にある[AddressTable]の[PrintAddr]と[PrintJointly]
をダブルクリックして、下段のフィールドに追加します。
６．追加した[PrintAddr]フィールドの抽出条件に[<3]と設定します。
７．クエリーを保存してクエリービルダを終了します。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
□ 宛名印刷レポートの修正する。
１．データベースウィンドウの[レポート]タブを選択します。
２．宛名印刷レポート[LetterAddrPrint]を選択し、[デザイン]ボタンを押下して
デザインウィンドウを開きます。
３．[詳細]セクションを選択し、[フォーマット時]プロパティにカーソルを移動して
右端の[...]ボタンを押下します。
４．Private Sub Detail_Format サブルーチンに、以前に記述したコードがあると
思いますが、それらのコードを以下の様に書き換えます。
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim StrAddr As String
If Me.PrintAddr = 1 Then
StrAddr = StrConv(Me.Address, vbWide)
Me.tbound3.Visible = False
Me.tbound4.Visible = False
Else
StrAddr = StrConv(Me.OfficeAddress, vbWide)
Me.tbound3.Visible = True
Me.tbound4.Visible = True
End If
Me.Address_sub1 = AddrConv(StrAddr)
End Sub
５．ここまで出来たら、一度レポートを保存して終了します。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
□ 宛名印刷レポートをプレビューで確認する。
ここで一度、宛名印刷のレポートを確認します。
住所フォームで適当にデータを入力して、宛名印刷条件設定画面を開きます。
登録したデータが一覧表示されるので、住所の自宅、会社、印刷しないを指定して
[印刷]ボタンを押下します。
自宅住所を指定したデータは、住所欄に自宅住所が表示され、会社名、部署名は表示
されません。
会社住所を指定したデータは、住所欄に会社住所が表示され、会社名、部署名も表示
されます。
印刷しないを指定したデータは表示されません。
ここで、気付かれた方もいらっしゃると思いますが、アクセス９７のレポートは、
[はがきウィザード]で作成したにも拘らず、用紙サイズがＡ４になっています。
ここで、用紙の指定方法について少し触れておきましょう。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
□ 宛名印刷レポートの用紙設定を行う。
１．宛名印刷レポートをデザインで開きます。
２．メニューの[ファイル]-[ページ設定]を選択します。
３．ページ設定のダイアログには、[余白][ページ][レイアウト]の３つのタブが
ありますが、まず[ページ]タブを選択します。
４．[印刷の向き]は[縦]のままで構いません。
[用紙サイズ]のコンボボックスの[はがき]を選択します。
※この[用紙サイズ]のコンボボックスの内容は、ご使用のプリンタに依存します。
大抵のプリンタには、[はがき]があると思いますが、[はがき]が無いプリンタ
でどうしても印刷したい場合、[ユーザー定義]等で、はがきのサイズ(100×148mm)
を指定します。
５．次に、余白の設定を行います。
[余白]タブを選択し、余白（上、下、右、左）を指定します。
この余白の最小値も、プリンタに依存します。
余白とレポートのデザインの縦横サイズの合計は、はがきのサイズより小さく
しないと、ページをはみ出し、途中で改ページしてしまいます。
レポートのデザインの縦横サイズは、[レイアウト]タブの真ん中の[サイズ]に
幅と高さで指定されています。
実際には、
はがきの縦の長さ(148mm)＞[レイアウト]タブのサイズの[幅]＋上余白＋下余白
はがきの横の長さ(100mm)＞[レイアウト]タブのサイズの[高さ]＋左余白＋右余白
となっていなければいけません。
６．レイアウトのサイズ＋余白は、少し小さめにしておくと、郵便番号の印字位置の
微調整が余白で調整できるので良いと思います。
次回は、宛名印刷レポートの続きで、連名の印刷、その他細かな調整を行います。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□
◇ ACCESSで作るシリーズ 【住所録ソフト編】
◇ 発 行 元 ：Yoshihisa Fukuda（福田 義久）
◇ ご意見・ご要望
ご質問等 ：fukud@nifty.com
◇ このメールマガジンは、インターネットの本屋さん『まぐまぐ』を利用して発行
しています。（まぐまぐID:0000077071)
◇ バックナンバー：http://homepage2.nifty.com/f-soft/
◇ 登録・解除 ：http://homepage2.nifty.com/f-soft/
Copyright(C) 2001-2002 Yoshihisa Fukuda All rights reserved.
◇転載について
このメールマガジンの無断転載などは、一切禁止です。
転載をご希望の方は、事前にメールで連絡をください。
◇免責
このメールマガジン及びホームページの内容による、いかなる損害、障害などに
関して発行者は一切の責任を負いません。
掲載広告についても同様です。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□