excel - 转到列表框中的选定项目

Question

我有一个列表框，其中填充了各种数据以及数据所在的行号，如下所示：

2012 年 3 月 31 日至 2012 年 4 月 15 日 [商品 A]，行：12009

在命令按钮上，我需要编写代码，单击该代码会将用户带到特定的行。列始终固定在第 2 列

Answer 1

如果在列表框中选择了某些内容，它将在冒号 (:) 之后找到值并选择该行号的第 2 列：

Private Sub CommandButton1_Click()
    Dim selectedItem As String
    If ListBox1.ListIndex <> -1 Then
        selectedItem = ListBox1.List(ListBox1.ListIndex)
        Cells(CInt(Mid(selectedItem, InStrRev(selectedItem, ":") + 1)), 2).Activate
    End If
End Sub