vlookup 尋找逗號分隔的儲存格值以及另一張工作表的引用

vlookup 尋找逗號分隔的儲存格值以及另一張工作表的引用

我有表1

**group**                 **Name**
red,white,blue
white, blue,red
blue,red
red,white,blue,pink

床單

sheet2 
Color              Name
red               joe
white             jim
blue              bill

床單

有多個記錄想要在sheet1 b1中多次查找組名的名稱不能使用Office 365進行textjoint。還有其他辦法嗎?

答案1

我會使用 VBA 來完成。

  1. Alt使用+開啟 VBA 編輯器F11

  2. 插入 > 模組

  3. 貼上此代碼:

子查找_VBA()

  調暗範圍
  Dim arr() 作為字串
  暗淡我只要
  暗淡匹配只要
  將 sResult 變暗為字串

  出錯時轉到 errH
  對於 Sheets("Sheet1").Range("A2:A10") 中的每個 c
    arr = 分割(c, ",")
    對於 i = 0 至 UBound(arr)
      match = WorksheetFunction.match(Trim(arr(i)), Sheets("Sheet2").Cells(1).EntireColumn, 0)
      如果匹配 = 0 那麼
        sResult = sResult &“不適用,”
      別的
        sResult = sResult & Sheets("Sheet2").Cells(match, 2).Value & ", "
      萬一
      匹配 = 0
    下一個
    sResult = Left(sResult, Len(sResult) - 2)
    c.Offset(, 1).Value = sResult
    sResult = vbNullString
  下一個
錯誤:
  如果 Err.Number = 1004 那麼
    繼續下一步
  ElseIf Err.Number > 0 則
    MsgBox Err.Number & " " & Err.Description, , "錯誤"
  萬一

結束子
  1. 在程式碼中,變更.Range("A2:A10")為「組」列中資料的實際位址。
  2. 如果需要,請變更Sheet1Sheet2為您的實際工作表名稱。
  3. F5

結果:
vba查找分隔符號逗號結果

相關內容