Home |
Search |
Today's Posts |
|
#1
![]() |
|||
|
|||
![]() 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 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Remove the apostrophe (') in Excel cell text values | Excel Discussion (Misc queries) | |||
display negative values as a blank cell in Excel | Excel Discussion (Misc queries) | |||
display negative values as a blank cell in Excel | Excel Discussion (Misc queries) | |||
How to display cell values in wordarts? | Excel Discussion (Misc queries) | |||
Stumped! Collecting values into one cell. | Excel Worksheet Functions |