Excel 列列表VBA

我已经有excel电子表格中的数据组织在4列中，如何在用户表单上的列表框（列列表）中显示整个数据，然后如何找到提取所选项目值的方法例如，我双击第一个项目（1，2），它会显示第二列（2）的值 我用这个来展示它

For r = 1 To Lista.ListCount
    If Lista.Selected(r) Then

        MsgBox r + 1
        MsgBox "You selected row #" & Sheets("View2").Cells(r + 2, rangE("View2_CN").Column)

    End If
Next

---

你在问什么？它显示范围中第二列的值。您希望它在MsgBox提示符中显示什么？您想问什么？它显示范围中第二列的值。您希望它在MsgBox提示符中显示什么？