こんにちは、じゅんぱ店長（@junpa33）です。
今回は、印字のための最終セットを行います。
印字の実行ボタンやプリンターの用紙セット方法などです。
先回まで作成して来た印刷用テンプレートを、実際に印刷していきます。
上手く印刷できるかどうか、すべてはプリンター設定にかかっています。
★印刷時のチェック項目として、「セル番号AK12」に入る文字（多くは「０」だと思います。）
この「０」が払込取扱票の記入枠からはみ出ていると、ゆうちょATMで読込エラーが発生します。
必須のチェック項目です。
一つ前の記事を確認するには、こちら↓で確認いただけます。
テキストボックスを180度回転したエクセルVBAコードを作成する
ゆうちょ払込取扱票印字の記事に関連した記事はこちらです。
コンテンツ
ゆうちょ払込取扱票印字のための設定
前回までで、「印刷用テンプレート」にすべての印字データを移しました。
そして、今回はそれを実際に印字するVBAコードを作成します。
さらに、出力側のプリンターの用紙設定を行います。
最後にテスト印字して完成です。
今までの進捗は、「印刷用テンプレート」がこのような状態になっています。
印字実行ボタンの設定
このようにボタンを設置します。
このボタンで操作するVBAコードを組み立てます。
実行させるプロシージャーは
テンプレートシート・・・前に使用した「印刷用テンプレート」を削除して新たに「印刷用tmp」シートを複製して「印刷用テンプレート」シートを作ります。
数字反転加工・・・・・・「入力シート」の数字データを「印刷用テンプレート」に移し180度回転表示します。
テキスト反転加工・・・・「入力シート」のを「印刷用テンプレート」に移し180度回転表示します。
さらに、「印刷用テンプレート」のすべての罫線を消すVBAコード
になります。
Subプロシージャー名を「振替印字」とします。
Sub 振替印字()
End Sub
テンプレシート
Module2.数字反転加工
Module3.テキスト反転加工
Worksheets(“印刷用テンプレート”).Select
Range(“AK12”).HorizontalAlignment = xlLeft ’20.10.13追記修正コード
Cells.Select
With Cells
.Borders.LineStyle = xlLineStyleNone
End With
Range(“AL1”).Select
ActiveSheet.PrintOut From:=1, to:=1, Preview:=True
全体としてVBAコードはこのようになります。
「入力シート」にボタンを設置します。
ボタンの設置方法はこちら↓を参考にしてください。
With ～ End With の使い方については、こちらを参考にしてください。
With～End Withの使い方。VBAコードを簡潔に記述する
コマンドボタンの設置方法はこちら↓の記事も参考になります。
Callステートメントについてはこの記事が参考になります。
ボタンにマクロを登録します。
これでボタンの設置は完了です。
今あるプリンターの用紙設定
ゆうちょ銀行の「払込取扱票」のサイズは、プリンターの規格の用紙サイズではありません。
「払込取扱票」のサイズは、180ｍｍ ✖ 113ｍｍになります。
ここから以降の内容は、プリンターの機種の元々の仕様に依存する部分も多いかと思います。
今回は、
「NEC Color MultiWriter5800C」でセットします。
今現在、自分が一番使っているプリンターです。ですので、このプリンターを使って説明しています。
ご自分のプリンターを試してみて、「イマイチフィットしないな。」というときは
この記事↓で解決してください。
①．ユーザー定義用紙の設定を行います。
印刷のページ設定で「余白」を上下左右「０」に設定します。
「払込取扱票」のサイズ（180ｍｍ ✖ 113ｍｍ）をそのままサイズ設定すると印刷範囲からはみ出てしまいます。
↓
この解決策として「払込取扱票」のサイズを「183ｍｍ ✖ 114ｍｍ」にして設定します。
印刷のページ設定で「余白」を上下右「0」に設定し、左を「0.5」に設定します。
②．用紙の印字方向は
「払込取扱票」が正立方向で印字スタートになるようにトレーに入れてください。
テスト印字してこのようになるとＯＫです。
使用するプリンターによって、用紙サイズ設定や印刷余白の微調整が必要になると思います。
特に「印刷用テンプレート」について、ほぼ余白がないほど用紙の実サイズに近いサイズになっていますので、
そのまま正直に用紙サイズをユーザー設定しても、大体のプリンターで印刷範囲がはみだすと思います。
ですので、実用紙サイズよりも1から3㎜ほど大きく設定するのが”コツ”になります。
20.10.13追記
口座記号の印字位置で、ゆうちょATMで読み取りができない場合があります。
修正方法を説明します。
修正方法は
マス目にかかる「０」の位置を、左詰めにします。
VBAコードから修正する場合は、上記のコードを追加してください。
ゆうちょ払込取扱票印字 プリンター設定のまとめ
このように、お金をかけず無料で、既製のゆうちょ銀行の振込用紙「払込取扱票」に皆さんの事務所にあるプリンターで印字することが出来ました。
購入したお客様に請求書を送る場合に、この振替用紙「払込取扱票」に内容が印字されて同封されているかいないかは結構大きなことだと思います。
「代金支払いまでの期間を短くできる」ことや「リピーター確保」にも繋げていけることですので、
是非、実践された方が良いのではと思います。
エクセルVBAを独習するのに参考書は欠かせません。 参考書選びは自分に合った「相棒」にできるものを選んでいきたいです。
エクセルVBAの独習でおすすめ参考書を7冊選ぶ。良書との出会いは大切です
次の記事はこちら↓から、このエクセルＶＢＡ「振込用紙印字ソフト」の完成品の取説記事になります。
無料ＤＬ「ゆうちょ払込取扱票印字」エクセルＶＢＡソフトの取り扱い説明
エクセルVBAを初めて勉強するときに効く
電子書籍版「Excelマクロ＆VBA超入門」をamazonで見てみる
（著者）井上香緒里
（出版社）技術評論社
（税込価格）1,738円（本体1,580円＋税）
マクロとVBAについて学んでみたいけれど，いまひとつ自信がないという方のために，ひとつひとつの操作を丁寧に解説する1冊目の教科書です。
エクセルVBAの「い・ろ・は の い」から説明していますので、安心して取り組める参考書です。
例題として、
- 「データ消去」「シートのコピー」「メッセージボックス」の機能を持つお小遣い帳
- 「入力フォーム」の機能を持った歩数表
2つの題材ファイルを作成しながら，マクロとVBAの基本を学習していきます。
エクセルVBAを使って業務効率を上げて行くのに、始めのうちに知っておきたいテーマを纏めてみました。
今回の記事はここまでです。 最後までご覧いただき有難うございました。
