Kind thanks Bernie, and three cheers for your easy to implement
solution!
Drew
Bernie Deitrick Wrote:
Drew,
You could use a User-Defined-Function, definition below. Copy the code
and
paste into a standard codemodule of your workbook. Used like:
=Nodes(A2,Sheet1!$B$2:$B$7,Sheet1!$A$2:$A$7)
Where A2 has the reuse code you are interested in, B2:B7 of Sheet1 has
the
reuse code table, and A2:A7 of Sheet1 has the Node values.
HTH,
Bernie
MS Excel MVP
Function Nodes(inVal As Range, _
InCode As Range, _
InNode As Range) As Variant
Dim i As Integer
Nodes = "None"
If InCode.Cells.Count < InNode.Cells.Count Then
Nodes = "Unbalanced entry ranges"
Exit Function
End If
If inVal.Cells.Count < 1 Then
Nodes = "Too many key values"
Exit Function
End If
For i = 1 To InCode.Cells.Count
If InCode.Cells(i).Value = inVal.Value Then
If Nodes = "None" Then
Nodes = InNode.Cells(i).Value
Else
Nodes = Nodes & ", " & InNode.Cells(i).Value
End If
End If
Next i
End Function
--
AthleteTO
------------------------------------------------------------------------
AthleteTO's Profile:
http://www.excelforum.com/member.php...o&userid=15943
View this thread:
http://www.excelforum.com/showthread...hreadid=274218