エクセルの表を利用して印刷物を作りたいのですが・・・

質問

こんにちは。ＯＳはWindows　meで、エクセルの２０００を使っています。

例えばですが、エクセルのシート１に
ナンバーとその他項目を表形式で入力して、
シート２上でシート１でのナンバーを入れると、
それに対応する項目がシート２の所定のセルに
出力されるなんていうことはできるでしょうか？

できれば、シート１でのナンバーをプルダウンみたいな感じで
選択できるといいなと思うんですが、そういうことができるなら
方法を教えていただけると嬉しいです。

エクセル初心者なので、わかりやすく教えていただけたら幸いです。
よろしくおねがいします。

回答No.1

imogasi · ベストアンサー

ちょっと希望が掴めないところあり。
●下記をやって見て、不満な点や改良点でも入れてください。ベストとは決して思いません。
他の解答者の方もそれの改良に答えてくれるでしょう。
本件は質問者の希望を固める呼び水と思ってください。
●Ｓｈｅｅｔ１のＡ１からＣ５まで下記データを入れる。
Ａ列　　Ｂ列　　Ｃ列
1 青木 盆栽に詳しい。横浜在住。旧軍隊経験者。孫　　　　　　　　１３人。
3 伊藤 身長１８０センチ。郷里は鹿児島。長らく官　　　　　　　　庁勤め。
5 新宅 音楽クラシックが趣味。印刷技術者。
6 黒岩 奥さんに先立たれ、一人身。山登りに今も月　　　　　　　　１回最低は行く。
7 星野 学者。今も講演で全国を回る。
番号は番号順に並べておくこと。（入力後並べ替えが出来るのは、ご存知の通り。）
●Ｓｈｅｅｔ２
Ａ１セルを番号を入れる場所に決める。
Ｄ３に情報を出す場所にする。
●Ｓｈｅｅｔ２のＤ３セルに関数式=VLOOKUP(A1,Sheet1!$A$1:$C$5,3,TRUE)と入れる。
Ｄ２セルに関数式=VLOOKUP(A1,Sheet1!$A$1:$C$5,２,TRUE)と入れる。
●Ｓｈｅｅｔ２のＡ１セルに番号を入れると、
Ｄ３セルに情報、Ｄ２に名前が出る。例えば「５」と入れると
新宅
音楽クラシックが趣味。印刷技術者。と出る
－－－－
更に改良すれば下記の通り、「プルダウンみたいな感じで
選択できる」ようになりますが、下記操作が文章では未経験者に伝わりにくいようなので。でもやって見てください。
コンボボックスを使う。
Ｓｈｅｅｔ２を開く。表示－ツールバー－ＶｉｓｕａｌＢａｓｉｃ－スパナと金槌Ｘ型アイコンクリック。
出てくるツールバーアイコンの中のコンボボックスをクリック。
＋印をセルＡ２からＢ２の辺りに持って来て右下方向へマウスをドルッグする。小さい四角が４つ以上見えるようになるから
その中でダブルクリックする。プロパティウィンドウが出る。
LinkedcellをＳｈｅｅｔ２！Ａ１に、ListFillRangeを
Ｓｈｅｅｔ１！Ａ１：Ｂ６と入れる。右上×で閉じる。
三角定規と鉛筆のマークをクリック。（凹みをなくす。）
これで▼をクリックすると番号と氏名が出てくる。
望みの人を選択してクリックすると、情報が出てくる。
Ｄ２とＤ３の式は下記に変更すること。
=VLOOKUP(VALUE(A1),Sheet1!$A$1:$C$5,2,TRUE)
=VLOOKUP(VALUE(A1),Sheet1!$A$1:$C$5,3,TRUE)

お礼

要領の悪い質問にもかかわらず、ご回答いただきありがとうございました。

さっそく試してみたのですが、前半部分はこれで完璧でした。
ただ、後半部分、なぜか▼をクリックしても番号しか出てきません。
何がいけなかったんでしょうか？
教えていただけたら幸いです。

補足

すみません、補足です。

作りたいものは、番号、氏名、情報を記入したカードのようなものです。
番号を選んで、必要な人の情報をピックアップして印刷することはこれで可能だと思うんですが、1番から最後の人までのカードをマクロかなんかを使って連続出力することは可能でしょうか？

よろしかったら教えてください。お願いします。

回答No.5

suzusan7

横レスみたいになって申し訳ないですが、レスがつかないようなので一言。

マクロはエクセルで ALT+F11 で起動するものを使用します。
ワークシートに関数のように書くものではありません。
自動印刷はそこで書いたプログラムのようなものを動かすことになります。
そこに繰り返しの命令を書くと、指定した回数だけ印刷眼命令をくり返すことになります。

では、そこに何を書けばよいかというと、
それはコード（プログラムのようなもの）です。
それがどんな風に書けばよいかというのを載せるにしても
実際のモデルと合うかどうか、またpuruq75さんの方で
修正ができなければ完成はしないということですね。

お礼

アドバイスをありがとうございます。お返事が遅れてしまいすみませんでした。

実際のモデルに合うかどうか、ということですが、
実際したいことというのがだいたい以下のようなことです。

１．Sheet1のA列に番号、B列に氏名、C列に1もしくは２が記載された表がある

２．Sheet2は、番号を選択して印刷をするシートとして利用。(これはできました)

３．Sheet3を連続印刷用のシートにして、セルA1に番号、A2に氏名、B1にSheet1のC列の１もしくは２が出力されるようにする。

４．Sheet3のA3、A4にそれぞれ以下の式を入れておき、A3かA4に○を出力させる
A３：=IF(B1=1,”○”,”　”)
A４：=IF(B1=2,”○”,”　”)

５．印刷範囲をA１－A４に指定して、Sheet1の表の人数分だけ印刷する(改ページを利用してB1セルの数字が出ないようにしようと思っています)

こういうことは可能でしょうか。
可能でしたらどのようのコードをどこに書けばいいのでしょうか？
よろしかったら教えていただけませんでしょうか。

補足

ご回答いただきました皆様、どうもありがとうございました。
そろそろ回答を締め切りたいと思います。
思うようなことが１００％はできなかったのですが、
けっこうできるようになり、作業が楽になりましたし、
また、私自身大変勉強になりました。

本当にありがとうございました。

回答No.4

imogasi

#1の補足に対する、解答（アドバイス？）。
Sheet1のＡ列に番号、Ｂ列に氏名、Ｃ列に文章的情報が入って
いるとします。Sheet3を印刷用メモに使います。Sheet1からSheet3へ内容・情報を適当な形に移し、Sheet3を印刷します。処理の流れは
（１）Sheet3に見だし（Ｄ１に）、罫線、書式等を設定する（不動部分）。
（２）Sheet1の第１行目に注目する。
（３）Sheet3のＡ２にSheet1のＡ列から持ってきて番号をセットする。
（４）Sheet3のＡ３にSheet1のＢ列から持ってきて氏名をセットする
（５）第４行は空白行とする。（体裁を整えるだけ）
（６）Sheet3のＡ５より下行に情報文章をセットする。
　　　勿論Sheet1のＣ列より持ってくる。
　　　文章は１行１５文字とし、それを越えると次行に折り返　　　す。
（７）Ｓｈｈｅｔ３を（シート）自動印刷する。
（８）次にSheet1の第２行目に注目する。
（９）（３）から（７）を繰り返す。
（１０）sheet1の入力行が終われば終了する。
前もってＳｈｅｅｔ１を氏名順とかに並べておくと、その順序に印刷物が出てくる。
さて希望が出ればコーディングを載せても良いが、上記モデル
と現実の問題がかけ離れていると、自力修正が出来ず、完成
しないかも知れないわけです。その点少し無理があるかと心配です。
それと「カード」は印刷された枠のある用紙に打つのか、白紙
に罫線をパソコンで引いたもので良いのでしょうか。

補足

ご回答ありがとうございます。

早速パソコンの前に向かってみたのですが、
当方初心者ゆえ、具体的にどうしていいか
わからなくなってしまいました。

具体的には、
（１）情報のセットのしかたは”＝”でいいのか、
　　　何か関数を用いたほうがいいのか？
（２）Ｓｈｅｅｔ３の自動印刷のしかた
　　　(自動印刷＝印刷アイコンを押すということでいいんですか？)
（３）繰り返し、の命令のだしかた。
（４）コーディングって何ですか？（すみません・・・）

ちなみに、カードは印刷のあるものに出力します。
この件に関しては、セルの大きさと入力位置で
何とかクリアできそうです。

回答No.3

imogasi

＃１の者です。お礼部分の
>さっそく試してみたのですが、前半部分はこれで完璧でした。ただ、後半部分、なぜか▼をクリックしても番号しか出てきません。-->リストボックスのデザインモードの状態で
（１）リストボックスの幅を十分大きく広げること。
（２）リストボックスのプロパティのColumnCountを「２」　に変えてください。
すると番号と氏名がリストボックスに現われると思います。

お礼

さっそくのご回答ありがとうございました。
たびたびのご足労申し訳ないです。

今度会社でさっそく試してみます。
また結果等は補足にて報告させてもらいますね。

本当にありがとうございます。

補足

ありがとうございます！
選択肢に名前も出てくるようになりました！
ただ、番号と名前の間にものすごく間があいているんですが
これは何とかならないでしょうか？

ささいなことでどうでもいいようなことですが、
できるようでしたら教えてください。
よろしくお願いします。

回答No.2

suzusan7

はじめまして。
お盆のせいか、レスが入ってないので、一言。

コンボボックスに番号と名前の両方が表示されるという
意味ではないのではないでしょうか。
コンボボックスに両方表示されてしまうと、
VLOOKUP関数がエラーを起こすことになると思います。
番号がプルダウンで得られたならそれで良いのではないでしょうか。

補足の連続出力については、繰返しによりマクロで可能です。
ただし、自動マクロでは作成できないと思いますので、
VBAで作成することになると思います。

お礼

さっそくの回答ありがとうございます。

そして、連続出力はVBAで作成ということですが、
具体的にはどうすればいいのでしょうか。
また教えていただけたら幸いです。

ありがとうございました。