excel - 変数に一致する行のみを使用して、Excel VBA リストボックスにシートのデータを入力する

Question

同僚がアップセルを表示できるように、職場で Excel プログラムを作成しています。私が立ち往生しているのは、リストボックスの人口です。リストボックスにデータを入力すると、すべての行が返されます。私がそれを返す必要があるのは、 E 列の名前が public 変数に含まれている名前と一致するすべての行です。解決策を見つけるためにあちこち検索しましたが、運がありませんでした。これは今私を悩ませ始めているので、どんな助けも大歓迎です。

Public Sub UserForm_Initialize() 
   var_associate = "Kirsty" 
   Dim var_nextline As Integer 
   var_nextline = 1 
   x = "a" 
   Do While x <> "" 
      x = Cells(var_nextline, 2) 
      If x <> var_associate Then 
          var_nextline = var_nextline + 1 
      Else 
          Me.lsb_upsell.AddItem(var_nextline, 2).Value 
          var_nextline = var_nextline + 1 
      End If 
   Loop 
End Sub