エクセルの関数について教えてください。

質問

エクセルで１つのデータがあります。

１つめのシートには、
　　１．コード番号
　　２．名称
　　３．郵便番号
　　４．住所
　　５．電話番号
のそれぞれのデータが入力されています。

２つめのシートには、
　　１．コード番号
　　２．数量
が入力されています。

エクセルの関数を使い、２つめのシートのコード番号の横に、１つめのシートの『名称』や『郵便番号』、『住所』を表示させたいのですが、どういうふうに設定すればよいかわかりません。

『データベース』という関数を使うことはわかるのですが、その先、どう指定すればよいのかわからないのです。

エクセルにくわしい方、教えてください。

よろしくお願いいたします。

回答No.2

alarm_set · ベストアンサー

１つめのシートが
　　　　 Ａ　　　　　　Ｂ　　　　　Ｃ　　　　 　　Ｄ　　　　　　Ｅ
１　コード番号　　名称　　郵便番号　　　住所　　　電話番号
２
３

２つめのシートが
　　　　 Ａ　　　　　　Ｂ　　　　　Ｃ　　　　 　　Ｄ　　　　　　Ｅ
１　コード番号　　数量
２
３

などという感じになっているのでしょうか？

もしそうであれば、

２つめのシートの「Ｃ２」セルに

=VLOOKUP($A2,Sheet1!$A$2:$E$100,2,FALSE)

「Ｄ２」セルに

=VLOOKUP($A2,Sheet1!$A$2:$E$100,3,FALSE)

「Ｅ２」セルに

=VLOOKUP($A2,Sheet1!$A$2:$E$100,4,FALSE)

「Ｆ２」セルに

=VLOOKUP($A2,Sheet1!$A$2:$E$100,5,FALSE)

と入力して、下にコピーしてみてください。

もしも１つめのシートの名前を変更しているのであれば、上の式の「Sheet1」の部分を変更してください。

また、１つめのシートのデータが100行目以降にも入力されている場合は「$E$100」の部分の100を増やしてください。

回答No.6

imogasi

（１）VLOOKUP関数を使うのが適当と思います。
（２）他にMATCH-OFFSET,MATCH-INDEXでも出来そうです。
（３）＞『データベース』という関数を使うことうことはわかるのですが、
データベース関数と言うのは「Ｄ－－－」の名の付いた関数で、（１）、（２）はデータベース関数とは言わないと思います。データベース関数の中にＤＧＥＴ関数がありこれによる回答を上げます。
しかし式複写が難しく、適してない事の説明を上げます。
（例データ）Ｓｈｅｅｔ１のＡ１：Ｅ４
コード番号 名称 郵便番号 住所 電話番号
112 山田 345-1111 千代田区 ２３４－２３４５
113 鈴木 234-1234 三鷹市 ２１１－２３１１
114 田中 211-1234 八王子市 ３４５－１２３４
Ｓｈｅｅｔ２のＡ１：Ｆ１とＡ２、Ｂ２
コード番号 数量 　名称 郵便番号 住所 電話番号
113 34
（関数式）Ｓｈｅｅｔ２の
Ｃ２に=DGET(Sheet1!$A$1:$E$4,"名称",Sheet2!A1:A2)
Ｄ２に=DGET(Sheet1!$A$1:$E$4,"郵便番号",Sheet2!$A$1:$A$2)
Ｅ２に=DGET(Sheet1!$A$1:$E$4,"住所",Sheet2!$A$1:$A$2)
Ｆ２に=DGET(Sheet1!$A$1:$E$4,"電話番号",Sheet2!$A$1:$A$2)
で鈴木 234-1234 三鷹市 ２１１－２３１１
が採れます。
しかしＡ３に別のコードを入れたとき
コード番号
114(例）
の組み合わせの作りにくさから、ＤＧＥＴ関数は不適だと思います。

お礼

まとめてお礼をさせていただきます。
みなさまどうもありがとうございました。

とりあえず今日、No.２の方の答えを参考にさせていただき、試してみました。
うまくいきました。

明日以降、他の方のやり方も試してみようと思います。

回答No.5

shyster

“コード番号” が順番にならんでないならこんな macro を使う．使い方は VLOOKUP とほぼ一緒．

Public Function FindInRange(vValue As Variant, rangeT As Range, lCol As Long) As Variant
Dim lRow As Long
Dim vFind As Variant

If IsEmpty(vValue) Then
FindInRange = Empty
Exit Function
End If
If Not (TypeOf rangeT Is Range) Then
FindInRange = CVErr(xlErrNum)
Exit Function
End If
If lCol < 1 Or lCol > rangeT.Rows.Count Then
FindInRange = CVErr(xlErrNum)
Exit Function
End If
For lRow = 1 To rangeT.Rows.Count
If rangeT.Rows(lRow).Cells(1, 1).Value = vValue Then
vFind = rangeT.Cells(lRow, lCol).Value
FindInRange = vFind
Exit Function
End If
Next lRow
FindInRange = Empty
End Function

（Indent とれちゃうね．許せ）

回答No.4

SAKURAMYLOVE

VLOOKUP関数の見本みたいな質問ですが、
１つめのシート（Sheet1)の項目が各列にあり、その下に100行までデータがあるものとします。
A1=コード番号
B1=名称
C1=郵便番号
D1=住所
E1=電話番号

２つめのシート（Sheet2)の項目も下記の各列にあるものとしたとき、
A1=コード番号
B2=数量
Ｃ～Ｆまでが１つめのシートからコード番号をキーにデータを引っ張ってきます。
C1=名称
D1=郵便番号
E1=住所
F1=電話番号
各項目の下には以下の式が入ります。
C2=VLOOKUP(A2,Sheet1!$A$2:$F$100,2,FALSE)
D1=VLOOKUP(A2,Sheet1!$A$2:$F$100,3,FALSE)
E1=VLOOKUP(A2,Sheet1!$A$2:$F$100,4,FALSE)
F1=VLOOKUP(A2,Sheet1!$A$2:$F$100,5,FALSE)
これを以下必要な行までコピーします。

回答No.3

esprei

vlookup関数を使えば出来るかな。
もしくはhlookup。
コード番号から電話番号までがそれぞれ列単位で入力されているのならvlookupです。

たとえばSheet1のA列にコード番号、B列に名称・・・E列に電話番号。
Sheet2のA列にコード番号。
B列に名称を入れたいとします。
B2から入るとして、B2のセルに、
=vlookup(A2,sheet1!A:E,2,0)
これで名称が検索されます。

=vlookup(検索したい文字列,検索する範囲,検索で見つかった時に表示する文字列が範囲の何行目か,検索の型)

つまり、検索するのはコード番号。
範囲はSheet1のデータ。
範囲指定の時にコード番号（検索したい文字列）が一列目に来ることが条件。
名称を表示したいので、範囲で言うと2列目となる。

関数で言うと、検索になります。

回答No.1

macbain

VLOOKUP関数でできます。VLOOKUPは極めてポピュラーな関数なので、教えて！goo（あるいはOKWEB？）で検索すれば過去の質問が山のようにヒットしますのでそちらを参考になされてはいかがでしょう。

　参考URLはEXCELのHELPのような解説ページです。

参考URL：

http://www.katch.ne.jp/~kiyopon/kansuu/address.html#vlookup