Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8378 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【33635】基本入力したものを、別のファイルで自動入力するには？ SAKURA 06/1/17(火) 11:15 質問[未読]
【33648】Re:基本入力したものを、別のファイルで自... Jaka 06/1/17(火) 14:56 発言[未読]
【33635】基本入力したものを、別のファイルで自動...
質問  SAKURA  - 06/1/17(火) 11:15 -
引用なし
パスワード
   Excelに関して全然素人ですので、何かアドバイスしてくれたら助かります。
早速ですが、質問についての内容を下記に記載します。

【基本入力.xls】
A　　 |B　　　　|C　　 　　 |D　　 　　 |E　　　　 |F　　 |G　　　|H　　
月日　|TEST1　　|TEST2　　　|TEST3　　　|TEST4　　 |TEST5 |TEST6　|TEST7
　　　|件数 金額|件数　金額 |件数　 金額|件数 金額 |金額　|金額　 |金額
--------------------------------------------------------------------------
1月2日 10　 3000　5　　6000　 7　　 500　 8　 10000 19500　2000　　1000
1月5日 12　 5000　8　　9000　 2　　 150　 9　　8700 22850　1000　　5200

１：TEST1、TEST2、TEST3、TEST4に関しては件数のみ【自動入力.xls】に自動
２：TEST5に関しては、自動入力しない
３：TEST6、TEST7に関しては金額を【自動入力.xls】に自動入力
４：TEST1〜TEST6の項目に関して、以後追加する可能性あり

※1 A〜Iの１まとまりが60個以上あります
※2 Aの月日は、日によって入力したりしなっかたりします

＜自動入力した結果＞
【自動入力.xls】
A　　 | B　　 　　 |C　　 　　 |D　　 　　 |E　　　　　 |G　　　|H　　
月日　| TEST1　　　|TEST2　　　|TEST3　　　|TEST4　　　 |TEST6　|TEST7
　　　| 件数　　　 |件数　　　 |件数　　　 |件数　　　　|金額　 |金額
--------------------------------------------------------------------------
1月2日　10　　　　　5　　　　　 7　　　　　　8　　　　　　2000　　1000
1月5日　12　　　　　8　　　　　 2　　　　　　9　　　　　　1000　　5200

VLOOKUP関数を使用して、いっきに結果を表示させたいのですが、どうすれば良いか
教えてくれないでしょうか？？？
色々調べたのですが、わからずじまいです。
VLOOKUP関数以外でも、他にいい方法がありましたらアドバイスくれないでしょうか。
長々となりましたが宜しくお願い致します。
【33648】Re:基本入力したものを、別のファイルで...
発言  Jaka  - 06/1/17(火) 14:56 -
引用なし
パスワード
   VLOOKUP関数をどう使おうというの解りませんが、
単純なセル参照でいいと思いますけど...。
自動入力.xlsブックの〇〇シートのA3:G3に下記関数を入れて、下に必要そうな所までフィル。
こういうことではないのでしょうか？
シート名は、状況にあった名前に変えてください。
（下記関数を書き込むときは、基本入力.xlsは開いてから書き込んでください。）

A3
=IF([基本入力.xls]シート名!$A3="","",[基本入力.xls]シート名!$A3)

B3
=IF([基本入力.xls]シート名!$B3="","",[基本入力.xls]シート名!$B3)

C3
=IF([基本入力.xls]シート名!$D3="","",[基本入力.xls]シート名!$D3)

D3
=IF([基本入力.xls]シート名!$F3="","",[基本入力.xls]シート名!$F3)

E3
=IF([基本入力.xls]シート名!$H3="","",[基本入力.xls]シート名!$H3)

F3
=IF([基本入力.xls]シート名!$K3="","",[基本入力.xls]シート名!$K3)

G3
=IF([基本入力.xls]シート名!$L3="","",[基本入力.xls]シート名!$L3)
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8378 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free