値の最後の出現を見つけてテキストボックスに表示

Question

2つのテキストボックスを持つ簡単なユーザーフォームがあります。ジョブ・エントリーの場合は1、ロケーション表示の場合は1。

私は、施設内の新しい場所に行くたびにバーコードをスキャンすることによって、部品の位置を追跡したいと考えています。これは、4〜5回同じバーコードを使用している可能性があることを意味します。

私のユーザーフォームでは、ユーザーがジョブ番号を入力するか、バーコードを最初のテキストボックスにスキャンすると、2番目のテキストボックスには、その部分の最後に記録された場所が表示されます。

私が書いたコードは、仕事番号が記録されて初めて初めて見つかるようです...トップダウンではなく、ボトムアップから検索する方法がわかりません。

誰も助言できますか？私は、シートにすでに書き込まれたデータでユーザーフォームを埋め込む方法を考え出すのに苦労しています。具体的にこれに関する読書資料へのアドバイスや指示は非常に高く評価されます！ここで

は私のコードです：

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を試みたことがありますか？