将“确定”按钮与基础ListBox链接的快捷方式

Question

Private Sub ListBox1_Click()
If CommandButton1_Click.Clicked Then
Dim i As Long, j As Long

j = 0
For i = 0 To ListBox1.ListCount - 1
    If ListBox1.Selected(i) Then
        j = j + 1
        SummaryEquities.Cells(j, 1).Value = ListBox1.List(i)
    End If
Next i
Else
End Sub

Private Sub CommandButton1_Click()

End Sub

我想将“确定”按钮（CommandButton1_Click（））连接到我选择的Markets，并将从列表中选择的值插入单元格列表A1中-其余。我想我有正确的代码来提取选定的市场，但是我正在努力寻找一种方法来将其连接到“确定”按钮。必须有一个捷径。有什么帮助吗？