Function HighestValue(NameToSearch As String, ListOfNames As Range) Dim lRow, x As Long lRow = Cells(Rows.Count, MyRange.Column).End(xlUp).Row For x = lRow To 1 Step -1 If Cells(x, MyRange.Column) = sValue Then HighestValue = Cells(x, MyRange.Column + 1).Value Exit Function End If Next x End Function
Function HighestValue(NameToSearch As String, ListOfNames As Range) Dim lRow, x As Long lRow = Cells(Rows.Count, ListOfNames.Column).End(xlUp).Row For x = lRow To 1 Step -1 If Cells(x, ListOfNames.Column) = NameToSearch Then HighestValue = Cells(x, ListOfNames.Column + 1).Value Exit Function End If Next x End Function
DON'T MISS
Sorry for the very late response, didn't mean to leave you hanging.
It looks to me as you would have to use a semi-colon instead of a comma. That would depend on the Excel regional version you have. I have to use the semi-colon, but most people here have to use the comma.
So try:
=HigestValue(E2;B:B)
Best regards,
Trowa
Didn't work neither. Got an error.