- ベストアンサー
vlookupのコード番号を自動的に変えながら印刷するには?
vlookupのコードを変えると他の部分がいろいろと変わるシートを作ってもらったのですが、コード番号が200以上あって、全部印刷するのに、一度ずつコード番号を入れては印刷・・・ということを繰り返すしかないのかなと思いつつ、もしかしたらもう少し簡単な方法があるのではないかと思い、質問しています。理想としては1枚目から200枚目まで自動的に印刷できれば最高です。以前質問した時、回答をいただけなかったので、できなければ無理という回答でも頂きたいと思っています。よろしくお願いします。
- miyoko1975
- お礼率42% (3/7)
- その他MS Office製品
- 回答数6
- ありがとう数5
- みんなの回答 (6)
- 専門家の回答
質問者が選んだベストアンサー
>番号を入れるのは一カ所です ですから、その「一カ所」というのは何処ですか... と、何度も質問してるのですが(;_;) とりあえず、見切り発車します 番号を入れるセルは、No1の補足から「B3」と推定します 違う場合は、cb = "B3" を、変えてください ------------------------------------ Sub 印刷() bango = 1 owari = 200 cb = "B3" Do While bango <= owari Range(cb).Value = Right("00" & bango, 3) ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True bango = bango + 1 Loop End Sub ------------------------------------- 「bango = 1」が最初の番号 「owari = 200」最後の番号です 途中から始めたい、途中まで印刷したい、という場合は、この数字を変えます 最初から200でやると、うまくいかなかった場合、紙の無駄になりますので 最初は、3~5位でやってみてください マクロ(VBA)の登録方法 入力のシートを表示している状態で 「Alt」+「F11}キーを押します そうするとVBAの画面が出ます そこで、「挿入」「標準モジュール」とし、上記のコードをコピーして貼り付けます 後は、シートに戻り、「ツール」「マクロ」「マクロ」とすると「印刷」が有りますので、それを「実行」で、印刷されます 内容を変更したい時は、「編集」で出来ます
その他の回答 (5)
- cistronezk
- ベストアンサー率38% (120/309)
回答2です。 >複数のシートということは私の浅はかな頭で考えつくのはシートを200枚コピーして番号を001~200までそれぞれ変えて・・・ということでしょうか? そのとおりです。そうしておいて印刷するときに「印刷対象」を「ブック全体」にすればよろしいかと思いました。それが急ぎの場合の現実的な対応と思いました。数時間で終わるでしょうから。しかしそれほど急ぎでもないなら、状況を具体的に説明してマクロの回答をもらったほうがいいでしょう。
お礼
ありがとうございました。私にもできそうな回答だったので助かります。希望の光が見えてきました。
- ASIMOV
- ベストアンサー率41% (982/2351)
>番号はセルBの列に入れることになってます 一か所ではないという事でしょうか? どのセルにどんな値を入れるのか、具体的に書いてください
補足
番号を入れるのは一カ所です。それによって氏名など10カ所が変わるようになっています。数式はほとんど一緒で一番最後の数字「3」だけが他の数字に変わるようです。何度もお答え頂きありがとうございます。
- ASIMOV
- ベストアンサー率41% (982/2351)
補足して頂いたのですが、まだ解らないことが.. >=VLOOKUP($B$3,マスタ!$B$2:$J$200,3) >「マスタ」という名前のシートの番号を001~200などと変えていくと と、有りますが、「マスタ」がシートの名前だと言うのは判りますが 番号の001~200というのはどれの事でしょうか セルB3 に入れると言う事ですか?
補足
補足見て頂いてありがとうございます。番号はセルBの列に入れることになってます。200人分の情報を印刷したいのですが、どうすれば良いでしょうか?
- cistronezk
- ベストアンサー率38% (120/309)
マクロで可能ではありますが、「作ってもらった」ということは、質問者さんはおそらくVLookup自体を使いこなせていないのでしょう。ましてマクロは無理と推察します。 作ってもらったシートを200枚コピー(複数のシートを選択してコピーすればたいした回数ではありません)して、コードを書き換え、一気に印刷する、というのが時間的には一番早そうです。
補足
お察しの通り、全くつかいこなせていません。複数のシートということは私の浅はかな頭で考えつくのはシートを200枚コピーして番号を001~200までそれぞれ変えて・・・ということでしょうか?もし違っていたらお知らせ下さい。
- ASIMOV
- ベストアンサー率41% (982/2351)
>vlookupのコードを変えると コードと言うのが、何の事か判りません 具体的な関数式を書いて、その式のどこをどう変えたいのか、書いてください
補足
説明不足ですみません。「マスタ」という名前のシートの番号を001~200などと変えていくと、その行の項目が別のシート上に反映されて、何カ所か変わっていくようになっていて、その中の一つの数式が「=VLOOKUP($B$3,マスタ!$B$2:$J$200,3)」です。数字を変えた方のシート(この数式がある方のシート)を印刷したいと思っています。おわかりいただけたでしょうか?
関連するQ&A
- エクセルのVLOOKUPの印刷方法について
エクセルのVLOOKUPの印刷方法についてですが、シート(1)(データ1~100)をシート(2)(個表)にVLOOKUP(1~100までの個表を番号入力でデータを表示する)で作成したあと1~100までの個表をいっきに印刷をする方法を教えてください。現状は個表の表は1つだけ作成していますので、1~100までの番号を随時入力して印刷しなければなりません。ご回答よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- VLOOKUPでお願いします
VLOOKUPは初めてです。 (シートA) A B C 1 コードNO. 名前 電話番号 2 0011112 佐藤 1111-3333 3 0022222 鈴木 1234-5544 4 1155444 山田 5566-1133 5 0333777 山下 8877-4477 (シートB) A B C 1 コードNO. 名前 電話番号 2 0022222 3 0333777 シートAが元データです。 シートBのA列に他からコピーしたコードNO.を貼り付けると自動的に シートAからに該当する名前と電話番号をシートBのB列C列に表示させる。 どうか宜しくお願いいたします。
- ベストアンサー
- その他([技術者向] コンピューター)
- 複数のシートに跨ってVLOOKUPするには?
複数のシートに跨っているデータをVLOOKUPで参照しようとしています。 1つめのシートには コード番号 シート名 の2つのカラムがあり、コード番号ごとに どのシートを参照すればよいかわかるようになっています。 参照されるほうのシートには コード番号 値 の2つのカラムがあります。 このシートが数十存在しますが、1つのシートにまとめることは出来ません。 1つ目のシート上で、 =VLOOKUP(A1,CONCATENATE(B1,"!A:B"),2,false) などと試してみたのですが、うまくいかないようです。 何か良い方法はないでしょうか。
- ベストアンサー
- オフィス系ソフト
- VLOOKUPについてわかりません
関数のVLOOKUPでどうやればいいのかよくわからないものがあります。 シートAとシートBにそれぞれコード(A000のようなもの)が記載されており、シートAにはおおよそ900ほど。シートBには16000ほどが載っています。 今回VKOOKUPでしたいことは、シートBからシートAと同じコードをピックアップしたいんです。 シートAにある900ほどのこーどはすべて違う種類のコードでして、シートBの16000ほどのコードの中にシートAの900ほどのコードと同じコードが紛れ込んでいます。 このシートBにあるコードからシートAと同じコードをVLOOKUPを使用して抽出したいのです。 大雑把な質問で申し訳ありませんが、何かいいやり方はありませんでしょうか? もしわかりにくいようでしたらご指摘いただければ追加で質問させていただきます よろしくお願いします
- ベストアンサー
- Excel(エクセル)
- EXCELの検索、VLOOKUPコード
こんにちわ、コード?に行き詰ったので質問します。 会員番号 商品 値段 1 A 100円 2 B 200円 3 C 300円 1 B 200円 1 C 300円 のような表をシート1に作ったとします。 シート2に会員ごとの明細を作っているのですが 会員番号の順番をソート?(順番並び替え)しないで 会員番号1の人だけの合計金額をシートに反映させたいとすると VLOOKUPにどのような定義をいれればよろしいのでしょうか? シート2には会員番号を入れる欄を作り そこに会員番号を入力すると合計金額が出ると言う仕組みです 大変困っているのでアドバイスお願いいたします。
- ベストアンサー
- 会計ソフト
- VLOOKUPで印刷開始と終了を指定しマクロ登録
シート1のG6にVLOOKUPの検索値 C4にVLOOKUPを設定 シート2のA1~B10にVLOOKUPの範囲を設定 A列に1~10の番号 があります。 Inputboxを使用して、1~10の番号の範囲を印刷開始番号と終了番号を入力し、 印刷範囲を自由に変更できるようにしたいと考えています。 VBAで登録したいのですが、どういったものになるのでしょうか。 宜しくお願いします。
- ベストアンサー
- Windows NT・2000
- VLOOKUPが効かない(>_<)
昨日出来たVLOOKUPの作業が今日は出来なくなりました。 そんな事ってありえますか? 使用するデータは異なりますが、VLOOKUP関数の条件部分は全く変えてません。 一致しない場合のエラー表示もなく、セルには関数式が表示されるだけです。 仕事とで息詰まって残業しています。どなたかお助けを~”(ノ><)ノ (課題内容) シート1には電話番号 シート2には電話番号と月額使用料 VLOOKUPで1と2を付け合わせ電話番号が合致する場合はシート1に月額使用料を記載したいです。
- ベストアンサー
- オフィス系ソフト
- ExcelのVLOOKUPを使った自動表示
昨日も似たような質問をしたのですが、新たに困った事が出てきたので 質問します。 Sheet1のセルに例えば下記のようにA列に番号、B列に苗字、C列に名前 A B C 1 1 山田 太郎 2 2 田中 一郎 : : : : と記載されていて、 Sheet2のセルB1に苗字、C1に名前を入力したらA1に自動的にその人の 番号が表示されるようにしたいのですが…。 VLOOKUP関数をうまく使えば出来るのでしょうか?? よろしくお願いいたします。
- ベストアンサー
- その他([技術者向] コンピューター)
- VLOOKUPについて
EXCEL2000のvlookupについての質問です。 下記のような使用法方法 =VLOOKUP(RC[-1],[コード.xls]Sheet1!R1:R65536,2,FALSE) はできるようになったのですが、 複数ファイル(シート全体)を検索する場合は どのように記述すれば良いのでしょうか? また、下記のエラーについて悩んでいます。 あるシートの値をvlookupで検索すると見つからないの ですが、普通に編集→検索をすると見つかります。 これはvlookupで検索できないということでしょうか?
- ベストアンサー
- オフィス系ソフト
- 一覧 → 帳票へ転記 → 自動差込印刷
Excel2013使用 シートAに一覧表があり、それをシートBの帳票に vlookupを使って転記をしています。 現在の状況です↓ 【シートA】(一覧表) ・A列には、1~30の通し番号があらかじめ入っています ・1行目は、項目名が入っています よって、実際のデータは「B2」から始まります 【シートB】(帳票) ・セル「B6」に、シートAのA列の番号を入力すると、その他の 項目がvlookupによって自動で反映されます ここからが本題です。 現在、シートBの帳票を印刷する際は、セルB6に手で「1」と入力→「印刷」 次に「2」と入力→印刷・・・という風にしています。 日によっては20以上になる事もあるので、自動で印刷が出来れば…と思います。 なにとぞよろしくお願いいたします。
- ベストアンサー
- Excel(エクセル)
お礼
できましたー!!感激です。まさに理想的な感じで印刷できたので良かったです。質問して良かったです。私にとっては神業です。ちんぷんかんぷんな質問に丁寧にお答え頂き本当にありがとうございました。感謝感謝です。