Vlookup from the bottom

Public Function VlookupNth(MyVal As Variant, MyRange As Range, Optional ColRef As Long, _
Optional Nth As Long = 1)
'Similar to Vlookup, but returns the Nth value found from the top of myrange.
'Not necessarily the First.
'The TRUE/FALSE argument usually found in Vlookup is assumed FALSE in this function.  Data does NOT need
'to be sorted, and it searches for EXACT match.
'if ColRef is omitted, uses the number of columns in myrange
'if Nth is omitted, returns the first value found


Dim Count, i As Long
Dim MySheet As Worksheet

Count = 0
Set MySheet = Sheets(MyRange.Parent.Name)
If ColRef = 0 Then ColRef = MyRange.Columns.Count
For i = MyRange.Row To MyRange.Row + MyRange.Rows.Count - 1
    If MySheet.Cells(i, MyRange.Column).Value = MyVal Then
        Count = Count + 1
        If Count = Nth Then
            VlookupNth = MySheet.Cells(i, MyRange.Column + ColRef - 1).Value
            Exit Function
        End If
    End If
Next i
VlookupNth = "Not Found"
End Function