Как рекурсивно добавлять ячейки?

Question

У меня есть лист Excel, который выглядит следующим образом:

|A  B   C      D 
----------------------------------------------------------------------------------- 
1 |ID PARENTID VALUE     RESOLVED VALUE (how to generate this?) 
=================================================================================== 
2 |0  0   /root     /root 
3 |1  0   /one     /root/one 
4 |2  0   /two     /root/two 
5 |3  0   /three     /root/three 
6 |4  3   /child-one-of-three /root/three/child-one-of-three 
7 |5  3   /child-two-of-three /root/three/child-two-of-three 

Каждая строка имеет ID и PARENTID. Я хочу сгенерировать содержимое последнего столбца, RESOLVED VALUE, путем resursively добавления VALUE каждой строки.

Как это сделать в Excel?

Answer 1

Предполагая, что данные начинаются в ячейке A3:

=IF(B4=A4,C4,VLOOKUP(B4,$A$3:$D$5,4)&C4) 

Вы должны расширить $A$3:$D$5 до размера вашего массива данных.

Answer 2

Это решение функции VBA.

Option Explicit 
Public Function ResValue(id As Long, table As Range, indexID As Integer, indexParentID As Integer, indexValue As Integer) As String 

Dim strTmp As String, idTmp As Long 
idTmp = id 
ResValue = "" 
Do While idTmp <> 0 
    strTmp = Application.WorksheetFunction.Index(table.Columns(indexValue), Application.WorksheetFunction.Match(idTmp, table.Columns(indexID), 0)) 
    ResValue = strTmp & ResValue 
    idTmp = Application.WorksheetFunction.Index(table.Columns(indexParentID), Application.WorksheetFunction.Match(strTmp, table.Columns(indexValue), 0)) 
Loop 
ResValue = Application.WorksheetFunction.Index(table.Columns(indexValue), Application.WorksheetFunction.Match(0, table.Columns(indexID), 0)) & ResValue 
End Function 

Вы можете использовать ResValue(id, table, indexID, indexParentID, indexValue) на листе для того чтобы сгенерировать разрешенные значения.

Примечания:

• id это идентификатор вы хотите создать разрешенное значение.
• table - адрес всей таблицы (исключая столбец разрешенных значений).
• Каждый индексный индекс является относительным индексом столбца для каждого поля. Например, идентификаторы в первом столбце таблицы, так indexID = 1, и ParentIDs находятся во второй колонке, так indexParentID = 2.

В вашем примере таблицы, вы должны ввести следующее в D3 (первая ячейка для разрешенных значений):

=ResValue(A3,$A$3:$C$8,1,2,3) 

И после этого вы можете заполнить эту формулу по столбцу.