[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『伝票入力用→データベース→抽出→伝票出力』(花)
過去ログでhttps://www.excel.studio-kazu.jp/cgi-n/kazuwiki2.cgimycmd=read&mypage=[[20050707230917]]を参照させていただいたのですがデータベースまでの流れは理解できたのですが、以降の「抽出→伝票出力」がわかりません。どのように抽出をして伝票出力が出来るのか・・・。
現在、私が作成しているExcelはSheet1(入力フォーム)Sheet2(蓄積データ)です。
Sheet1
A B C D E 1 入力日 作業日 部署名 作業内容 作業時間 2
Sheet2
A B C D E 1 入力日 作業日 部署名 作業内容 作業時間 2 7/2 7/1 業務 伝表入力 2 3 7/3 7/1 現場 軽作業 1.5
現行はSheet2をオートフィルタで作業日で絞り一覧のまま書類提出をしていたのですが、個々に単票として出力をしなくてはならなくなってしまいました。
単票の内容は入力日、作業日、部署名、作業内容、作業時間の他に手書きで作業内容の詳細、各部署担当者の検印スペースです。
Excelでこの様な事は可能なのでしょか?
ややこしい文章、説明不足な点もあると思いますが初心者でどの様にしたらよいのか、出来るのかどうかも検討がつきません。よろしくお願いいたします。
こんにちは! ↓こちらですね。 [[20050707230917]]『伝票入力で』(あんぱん) で、 >「抽出→伝票出力」がわかりません >Sheet2(蓄積データ)です。 ということですから、もう一枚シートを用意して抽出先とします。 >現行はSheet2をオートフィルタで作業日で絞り一覧のまま書類提出をしていたのですが なので、コピーして抽出先のシートに貼り付けます。 >個々に単票として出力をしなくてはならなくなってしまいました。 単票というのがよくわかりませんが、決まったレイアウトの単票という様式を 作っておいてそこにデータを転記するのなら、 Sheets("単票").Range("A1").Value = Sheets("抽出先").Range("A1").Value こんな感じでできると思います。とここまで書いて今朝も同じ様な質問がありましたね。 [[20050725053103]]『一覧表からシートを作成するマクロ』(しゃみ) (SoulMan)
このようにしますと、見出しを付け、1データ1ページで簡単に印刷できます。 (LOOKUP)
1.行見出しを除くデータ部分を選択し、ファイル、印刷範囲、印刷範囲設定に設定します。
2.ファイル、ページ設定で、行のタイトルを指定します。
3.印刷プレビューで、余白をクリックして、下から2番目の破線を上にドラッグして 明細行の1行目の直ぐ下に移動させます。 これで、見出しを付け、1ページ1データで印刷できるようになりました。
4.上下、左右の空白の調整は、破線のドラッグで、データの高さの調整は、元の表のセル高で 調整します。
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.