Q&A
「+」は最大一つですか？
このような複数のスプレッドシート（エクセルドキュメント[シート]）がある場合、
抽出元データ
| ID | 商品 |
|---|---|
| 001 | りんご |
| 002 | バナナ |
| 003 | メロン |
| 004 | いちご |
| 005 | みかん |
抽出先データ
| ID | 商品 |
|---|---|
| 002 | バナナ |
| 003+002 | メロン+バナナ |
| 004 | いちご |
| 001+005 | りんご+みかん |
| 005+002 | みかん+バナナ |
VLOOKUP関数を使ってIDをキーにして、抽出先データのように複数（+は残したまま）抽出することは可能でしょうか？
またVLOOKUP関数で不可能な場合でも他の方法が何かあれば教えていただけると助かります
ご質問ありがとうございます
目先の実務では「+」は1つのみとなります
3つ（「+」が2つ）以上の場合ももしあれば、なければ2つ（「+」が1つ）の場合だけでも問題ないので何かお気づきの箇所があれば、お手すきの際にもご教授いただければ幸いですm(__)m
回答3件
0
今回のご要望ならGASが必須ってことは無いです。
Googleスプレッドシートであれば、諸々の関数を組み合わせてkainaさんの回答の2-4を関数で対応可能です。ExcelだとまだSplit関数が無いと思うので厳しいかも。
試しにテストしてみましたがSPLITの際にIDのところが 001 → 1 に変換されてしまうので、とりあえずIDが3桁の数字である前提でTEXT関数で処理しました。実際はIDは全然違う桁数や組み合わせという場合は、ここを修正する必要があります。
1の行毎に～の部分はコピペかオートフィルで対応いただくのが良いです。
頑張れば1つの式で出来なくもないですが、逆に遅くなるんじゃないかと思います。
GoolgeSheets
1=ARRAYFORMULA(TEXTJOIN("+",TRUE,IFERROR(VLOOKUP(TEXT(SPLIT(A2,"+"),"000"),'抽出元データ'!$A$1:$B,2,FALSE),)))
投稿2021/06/10 00:16
総合スコア3011
0
関数じゃなくてvbaであれば、以下のイメージでIDが増えても対応できます。
１．抽出先データの行ループ
２．IDの内容をスプリットで配列に格納
３．２で抽出した配列数分ループ
４．VLOOKUPでスプリットで分割したIDをキーに検索し、商品列に+を付けて出力
上の内容に対してさらに以下の点を考慮してあげればOK。
・商品列に出力する際に+で終わらないようにする
・検索出来なかった場合を考慮する
投稿2021/06/07 07:27
総合スコア418
0
とりあえず間に合わせで書くならこういう感じでいかがでしょうか。
Excel
1=IF(LEN(A2)=3,VLOOKUP(A2,抽出元データ!A:B,2,FALSE),VLOOKUP(LEFT(A2,3),抽出元データ!A:B,2,FALSE)&"+"&VLOOKUP(RIGHT(A2,3),抽出元データ!A:B,2,FALSE))
VBAを使っていいならたとえばこんな感じ。
VBA
1Public Function SAMPLEFUNC(pFind, pRange) 2 Dim arr, i 3 arr = Split(pFind.Value, "+") 4 For i = LBound(arr) To UBound(arr) 5 arr(i) = WorksheetFunction.Index(pRange, WorksheetFunction.Match(arr(i), pRange.Columns(1), False), 2) 6 Next 7 SAMPLEFUNC = Join(arr, "+") 8End Function 9
投稿2021/06/07 04:39
編集2021/06/07 15:55
総合スコア4592
具体的なサンプルまで記載いただきありがとうございます
また返信が遅れて大変申しわけありません
まずはいただいた関数のサンプルで理解をしたうえで処理をし、折を見てGASの勉強をすすめスムーズな処理ができるよう頑張ってみ用途思います
あなたの回答
tips
プレビュー
