Look up and removing duplicates

Another Power Query variant

let

    Source = Excel.CurrentWorkbook(){[Name="Tabelle1"]}[Content],
    AddResult = Table.AddColumn( Source, "Result",
        each Text.Combine( List.Distinct( List.Skip( Record.FieldValues(_) ) ), ", " ), type text ),
    SelectColumns = Table.SelectColumns(AddResult,{"Code", "Result"})

in
    SelectColumns

To play with Office Script

function main(workbook: ExcelScript.Workbook) {

    const sheet = workbook.getActiveWorksheet()
    const table = workbook.getTable("Tabelle1")
    const result = workbook.getTable("Result")
    const target = sheet.getRange("H15:I15")
    const data = table.getRangeBetweenHeaderAndTotal()

     if (!result) {
        target.setValues(Array.of(["Code", "Result"]))
        sheet.addTable( target, true).setName("Result")
    } else {
        const nRows = result.getRowCount()
        if (nRows) { result.deleteRowsAt(0, nRows) }
        }

    for (let row of data.getValues()) {
        let cleaned = new Set(row.splice(1).filter(x => x))
        let ooutput = [row[0]].concat([...cleaned].join(", "))
        result.addRow(-1, ooutput )
        
    }
}

An alternative could be Power Query. In the attached file you can add data to the blue dynamic table. Then you can click in any cell of the green table and right-click with the mouse and select refresh to update the green result table. This solution works in legacy Excel such as Excel 2013 and in modern Excel.