vlookup para valores de celda separados por comas con referencia de otra hoja

Question

tengo hoja1

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

sheet2 
Color              Name
red               joe
white             jim
blue              bill

con varios registros desea realizar búsquedas múltiples de los nombres del nombre del grupo en la hoja 1 b1, no puede usar Office 365 para la unión de texto. ¿Cualquier otra forma?

Answer 1

Yo lo haría usando VBA.

1. Abra el editor VBA usando Alt+F11

2. Insertar > Módulo

3. Pega este código:

Subbúsqueda_VBA()

  Dim c como rango
  Dim arr() como cadena
  Atenuar mientras dure
  Partido tenue mientras
  Dim sResult como cadena

  En caso de error Ir a errH
  Para cada c en hojas("Hoja1").Rango("A2:A10")
    arr = Dividir(c, ","")
    Para i = 0 a UBound(arr)
      coincidencia = WorksheetFunction.match(Trim(arr(i)), Sheets("Sheet2").Cells(1).EntireColumn, 0)
      Si coincide = 0 entonces
        sResultado = sResultado & "N/A, "
      Demás
        sResult = sResult & Sheets("Hoja2").Celdas(coincidencia, 2).Valor & ", "
      Terminara si
      partido = 0
    Próximo
    sResult = Izquierda(sResult, Len(sResult) - 2)
    c.Offset(, 1).Valor = sResultado
    sResultado = vbNullString
  Próximo
errH:
  Si Número de error = 1004 Entonces
    Continuar siguiente
  De lo contrario, si número de error > 0, entonces
    MsgBox Err.Number & " " & Err.Description, "Error"
  Terminara si

Subtítulo final

4. En el código, cambie .Range("A2:A10")con la dirección real de los datos en su columna "grupo".
5. Si es necesario, cambie Sheet1y Sheet2con los nombres de sus hojas reales.
6. GolpearF5

Resultados: