[[20210901154321]]　『1セルに2つ検索値があるVLOOKUP関数について』（佐々木）　ページの最後に飛ぶ

『1セルに2つ検索値があるVLOOKUP関数について』（佐々木）

　　　　　A列　　　　　B列
１行目　　りんご　　　東京　　　　　
　　　　　オレンジ　　神奈川

２行目　　りんご　　東京　　　　　　
３行目　　オレンジ　　神奈川

お世話になります。VLOOKUP関数を使用してA１のような１セルに改行で区切られた文字を検索値としてB１にそれぞれの値を取り出すことは可能でしょうか？

[[20210825102710]]
以前こちらで質問しましたが、Repace関数だとうまくいかなかったのでvlookupかまたほかの方法があれば教えていただきたく存じます。

＜使用 Excel：Excel2019、使用 OS：Windows10 ＞

同じ内容の質問には見えませんけど。

 =VLOOKUP(LEFT(A1,FIND(CHAR(10),A1)-1),A2:B3,2,FALSE)&CHAR(10)&VLOOKUP(MID(A1,FIND(CHAR(10),A1)+1,999),A2:B3,2,FALSE)

（変なおやじ） 2021/09/01(水) 16:11

 補足で。
 ほぼ同じ式を考えていたので(後半部分のMID関数をREPLACE関数とした形)。
 式を入力したセルの書式設定で配置の折り返して全体を表示するにチェックを入れてくれ。
（ねむねむ） 2021/09/01(水) 16:20

変なおやじさん、ねむねむさん。ありがとうございます。とても助かりました。

 >同じ内容の質問には見えませんけど。
同じ文字が含まれているとうまく置換できないため、他の方法を探していました。
（佐々木） 2021/09/01(水) 16:30

再度質問なのですが、2行目以降、検索値の数に違いがあることを前提とすれば、式をどのように変えればよいでしょうか？

　　　　　A列　　　　　　B列
１行目　　りんご　　　　東京　　　　　
　　　　　オレンジ　　　神奈川
　　　　　パイナップル　埼玉
　　　　　　　　　　　
２行目　　りんご　　　　東京　　　　　
　　　　　オレンジ　　　神奈川

３行目　　りんご　　　　東京　　　　　
　　　　　　　　　　

５行目　　りんご　　　東京　　　　　　
６行目　　オレンジ　　神奈川
７行目　　パイナップル　埼玉
（佐々木） 2021/09/01(水) 17:19

 一つのセル内で最大何行になるのだろうか？
（ねむねむ） 2021/09/01(水) 17:20

 >一つのセル内で最大何行になるのだろうか？

5行を想定しています。
（佐々木） 2021/09/01(水) 17:29

数式だと長くなりそうなので、ユーザー定義関数です

 Function MVlookup(検索値 As Variant, 検索範囲 As Range, 列番号 As Long, Optional 検索方法 As Boolean = True, Optional エラー値 As Variant = "#N/A") As String
    Application.Volatile
    Dim s, s1, v
    Dim i As Long

    v = Split(検索値, vbLf)
    s = ""
    For i = 0 To UBound(v)
        On Error Resume Next
        s1 = エラー値
        s1 = WorksheetFunction.VLookup(v(i), 検索範囲, 列番号, 検索方法)
        On Error GoTo 0
        s = s & s1 & vbLf
    Next
    MVlookup = Left(s, Len(s) - 1)
 End Function

（変なおやじ） 2021/09/02(木) 08:23

横から失礼。
ひとつのセルにはひとつの情報という原則を守ったほうがよいと思います。
最初に間違った方針をとると、苦労がいつまでも続きます。
人様に作ってもらうことはこういう場合の解決策にはならないと思います。

（γ） 2021/09/02(木) 09:01

変なおやじさん、Yさん　ありがとうございます！

 >ひとつのセルにはひとつの情報という原則を守ったほうがよいと思います。

おっしゃる通りですね。列を増やして区切り位置で対応しようと思います。
（佐々木） 2021/09/02(木) 11:08

コメント返信：

[ 一覧(最新更新順) ]

[[20210901154321]] 『1セルに2つ検索値があるVLOOKUP関数について』（佐々木） ページの最後に飛ぶ

[[20210901154321]]　『1セルに2つ検索値があるVLOOKUP関数について』（佐々木）　ページの最後に飛ぶ