数字上的VBA匹配在字符串上工作时不起作用

Question

我遇到了一些代码问题。

我正在尝试根据匹配的值检查/取消选中，虽然值是字符串，但它工作正常，但我尝试只使用数字而且它不再起作用，我没有错误，但没有什么是在我的列表框中查看。

以下是代码：

For lItem = 0 To Worksheets("Bordereau Prep").ListBoxPlot.ListCount - 1
    For j = 1 To wkslst.Cells(rowx, 39).Value
        If Worksheets("Bordereau Prep").ListBoxPlot.List(lItem) = wkslst.Cells(rowx, 39 + j).Value Then
            Worksheets("Bordereau Prep").ListBoxPlot.Selected(lItem) = True
        End If
    Next j
Next lItem

我猜测ListBoxPlot中的内容格式与我的范围不同（wkslst.cells（rowx ...）但我不知道如何匹配数字。

我尝试过.list.value（lItem）但是它返回了一个错误。

请帮帮我吗？