[三流君] −−> [VBAで楽しく] −−> [バックナンバー一覧]
−−> No.074 Access 列型レポートの左端に印刷したい

Access 列型レポートの左端に印刷したい

メルマガ発行内容

<Access 列型レポートの左端に印刷したい>

こんにちは、三流プログラマーKen3です。 今回は、 Accessの列型のレポートに対しての小細工です。 サンプルファイルは、 http://www.ken3.org/vba/lzh/vba074.lzh にtest074.mdb(Access97版)が保存されています。

/* * 1.今回のキッカケ */

掲示板 http://www.ken3.org/cgi-bin/bbs/vba/wforum.cgi に 下記の質問が書かれました。 ---- >  アクセスで列型のレポートを作りたいのですが、困っていることが > あります。列型のレポートそのものは作れるのですが、ラベルがうまく > いきません。 >  作りたいのは縦4列のデータを出力し、左端にラベルをつけるとい > うものです。 >  詳細にラベルを置くと繰り返し出力してしまいます。結局解らなく > て、現在はラベルと罫線と、データを分けて二重に出力するという面倒 > な方法をとっています。 >  何か解決方法はないものでしょうか? ---- やりたいことは、なんとなく、わかったけど、 さて、どうしましょう。 列型のレポート、外枠に何か書きたい、、のかぁ、、 上下はページのヘッダー、フッターがあるけど、 左右はそれらしいの無いしなぁ。今回使いたいのは左側に何か書きたいときかぁ。 少し簡単な逃げ手でもあるかやってみますか。 そんなにスゴイ手じゃないので、期待しないでくださいね。。。

/* * 2.思いついた逃げ手の解説 */

まずは、Accessのレポートで4列の印刷を作ります。 これは、意外と簡単かなぁ。 ※サンプルは宛名ラベル印刷で作ると、楽かなぁ。 で、列の間隔を0にします。 ↑参考画面 次は、左側を空けた印刷フォーマットを作成します。 普通に印刷したいコントロールを並べます。 次がポイントの前準備で、 左端に、cntAとテキストボックスのコントロールを貼り、 コントロールソース=1 集計を全体にします ↑設定したプロパティ ホントは可視を不可視にして見えなくするけど、 テストで見えている状態でプレビューします。 ↑右側無いので変だけど、連番が表示されると思います。  ※こんなんで連番作れたんですね、   コントロールソース=1 と 集計全体、覚えておくと使えるかも。 さてと、確認終わったら、可視を不可視(いいえ)にして連番は見えなくします。 連番なんてカウントして、なんになるんだよ、 質問は連番を表示したいじゃないだろ。 まあまあ、あわてないでよ。 次はやっと、 左端だけに出したい文字の細工です ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ テキストボックスを txtLEFT01など、名前を付けて作成します。 コントロールソースにIIfを使用して、細工します。 細工は、 ~~~~~~~~ =IIf(([cntA] Mod 4)=1,"左端","") と入力しました。 このIIf文で、 カウンタを4で割って余りが1、すなわち、左側の時だけ固定文字を出力してます。 実行すると、 みたいに、左端の時だけ固定の文字"左端"を表示してます。 コイツを応用して、固定の文字だけじゃなく、 =IIf(([cntA] Mod 4)=1,[ID],"") として、左端の時だけ、IDフィールドを出すなんてこともできます。 cntAに連番が振られているので、 その連番を4で割りあまりが1の時(左端の時) を([cntA] Mod 4)=1とMOD演算子を使って計算します。 IIfの真/偽を利用して、左端以外の偽のときは””と空白を出力、 左端のときは、固定文字でもいいし、コントロールソースでも好きに表示して、 って感じの仕組みです。

/* * 3.仕掛けが有効な時、この仕掛けではムリな時 */

もう、わかったと思いますが、 出力する文字が短い時は、この逃げ手でなんとかなると思います。 余白、列間の幅で吸収できる幅なら、列間を0にして、左に細工の場所を作成する。 が、 左端に印刷したい文字が長い時は、 列と列の間がかなり開いてしまうので、使えない逃げの一手です。 使えるパターン [ZZZ] [AAAAAAAAA][ ] [AAAAAAAAA][ ] [AAAAAAAAA][ ] [AAAAAAAAA] [ZZZ] [AAAAAAAAA][ ] [AAAAAAAAA][ ] [AAAAAAAAA][ ] [AAAAAAAAA] と左端の表示が短いときは、左端の時だけ表示、あとは空白、列間代わり 使えないパターン [ZZZZZZZ] [AAAAAAAAA][ ] [AAAAAAAAA][ ] [AAAAAAAAA] [ZZZZZZZ] [AAAAAAAAA][ ] [AAAAAAAAA][ ] [AAAAAAAAA] と、左端の表示が長いと、列間が大きくなり使えない、、、 所詮、小細工だから、こんなもんかな。。。 連番のテクニック と コントロールソースでIIfを使うテク これだけでも覚えておいて下さい。 次の逃げ手を考えないと、、、、

/* * 4.おわりの挨拶 */

今回は、Accessレポート ・連番の振り方 ・IIfをコントロールソースで使う でした。 あっ、タイトルと内容がぜんぜん違うよ まぁ、いつものことだからゆるしてね。。。(笑) 拾い読みして、 1つでも何かの参考となれば幸いです。 Excel/Access大好き、三流プログラマーKen3でした。 ※評価は↓で投票してね。感想は掲示板かメールでくださいね。

フィードバック

VBA系の→[掲示板]←を覗く、質問を書き込む

評価・感想

No.074を読んだ満足度(評価)は?
5満足(参考になった)
4まぁまぁ(一部参考になった)
3普通(どちらとも言えない)
2なんかなぁ(期待と違った)
1不満(読んで損した気分)
作者に感想・質問を送る場合は下記に気軽に書いてください
あなたのお名前(ニックネーム) さん

作者からの返信は、 不用 E-mail で受信したい
*質問・感想はメルマガで紹介する場合があります

ページフッター(リンクや広告など)


[三流君(TOP ken3.org へ戻る)]
-- [VBA系TOPへ]
---- [VBA系バックナンバー目次へ移動]
------ [VBAでIEを操作 CreateObject("InternetExplorer.application")]・・・実は当店一番人気、VBAでIEを操作するサンプルです
------ [VBAでOutlookの操作 CreateObject("Outlook.Application")]・・・Outlookを使い、メール関係の処理です
------ [Access から Excel 連携 CreateObject("Excel.Application")]・・・人気のAccessからExcelへデータ書き出しなどです
------ [AccessのUserForm/サブフォームを操作]・・・アクセスでフォームを使ったサンプルです
------ [Accessのレポートを操作]・・・レポートを操作してみました
------ [Access クエリー関係やその他関数]・・・あまりまとまってませんが、スポット的な単体関数の解説です
------ [Excel UserForm(ユーザーフォーム)を操作する]・・・エクセルでユーザーフォームを作成して入力などを行ってます
------ [ExcelからAccessを操作する]・・・ExcelからAccessのマクロを起動してみました、
------ [Excel関係 関数、その他]・・・その他Excel関係です
------ [VBAでテキストファイル(*.txt,*.html,*.csv)の操作]・・・テキストファイルを使ったサンプルです
------ [VBA 標準関数関係とその他解説]・・・その他、グダグタ解説してます


広告
-- [通販系の売れ筋広告へ] ←主に楽天やAmazonのランキングです
blog
-- [三流君の作業日記] ← 日々の作業を少々
-- [通販あしあと] ← 通販ページの足跡を一覧で羅列

情報を探す

情報を探すならGoogleかな?

↓Web全体、サポート情報(support.microsoft.com)や三流君VBA(ken3.org)から検索する
Google
Web www.ken3.org
www.microsoft.com support.microsoft.com

あとは、項目別にMSでお勉強かな?
◆ マイクロソフト サイトの歩き方
◇ How-To インデックス
◇ FAQ インデックス
◇ スキルレベル別おすすめコンテンツ
◇ テクノロジ マップ
◇ テーマ別技術資料一覧

書籍の購入

Webだけじゃさすがに勉強しきれないので、プログラミング関係の書籍も読んでみては??

コンピュータ書籍の発送がハヤイ専門店

コンピュータの本・専門店
種類が豊富で探し易いです。※在庫ありが48時間以内発送が急ぎで資料や書籍がほしい時、とても助かります。
お奨め本の目次を見るだけでも勉強になったり

amazon.co.jpでキーワード別チェック

下記、私が設定したキーワードですが、こんな感じで資料や書籍を探ってみては?
[VBA全体を把握する] -- やはり全体をさらっと見たいですよね。
[SQL関連でDB力UP] -- システムはデータベース設計が重要
[ADO接続を探る] -- VBAなのでADO接続を押さえておく
[Windows APIを探る] -- さらにAPIになて知ってれば強力だ!
[.NETを探る] -- と言っても時代は.NETに流れてるし
プログラミング以外でも知りたいことは多くって、
[人間関係] -- で、客先・上司、まわりに気を使い。
[プログラマーの自己啓発] -- プログラムだけじゃなくいろいろと向上したいよ
[コーチング・育成] -- 先輩になったら後輩(部下)の面倒をみてね。
そんなこんなでプログラマーっていろいろと大変なんだってば・・・