查找值的最后一次出现并在文本框中显示

Question

我有一个简单的用户窗体，它有2个文本框。 1个工作条目，1个位置显示。

我想通过扫描条形码来追踪零件的位置，每次它们到达我们设施中的新位置时。这意味着我可能有相同的条形码＃4或5次。

在我的用户表单中，当用户键入工作号码或扫描条形码到第一个文本框中时，第二个文本框将显示该部分的最后记录位置。

我写的代码似乎只找到了第一次录制的工作号码......但我不确定如何让它从下往上搜索，而不是从上到下搜索。

任何人都可以建议吗？我在计算如何使用已经写在工作表上的数据填充用户表单时遇到了很多麻烦。任何建议或指导阅读材料具体关于这将非常感谢！

这里是我的代码：

Private Sub txtSCAN_BARCODE_FIND_Change() 
'LOOP THROUGH DATABASE AND FIND THE PART LOCATION 
Dim WS As Worksheet 
Set WS = ThisWorkbook.Sheets("DATABASE") 
WSLR = WS.Cells(Rows.Count, 1).End(xlUp).Row 

For X = 2 To WSLR 
    'This is the job number we're looking for 
    If WS.Cells(X, 1) = Me.txtSCAN_BARCODE_FIND Then 
     'This is where the last recorded position is going to display 
     Me.txtLOCATION_FIND = WS.Cells(X, "F") 
     Exit Sub 
    End If 
Next X 
End Sub 

Answer 1

你试过For X = WSLR To 2 Step -1？