excel - 如何将值添加到用户窗体上的第二个列表框

Question

我想在 Excel VBA 的一个用户窗体中创建两个单独的列表框。

通过使用以下代码创建了一个列表框，并添加了值，但另一个列表框显示名称不明确的错误。

如果我将名称更改为 UserForm_Initialize1() 或它不接受的名称。

我应该如何向同一用户窗体中的第二个列表框 (ListBox2) 添加值？

Private Sub UserForm_Initialize()
    With ListBox1
        ListBox1.AddItem "MBA"
        ListBox1.AddItem "MCA"
        ListBox1.AddItem "MSC"
        ListBox1.AddItem "MECS"
        ListBox1.AddItem "CA"
    End With
End Sub

Answer 1

你的意思是像下面的代码吗:

Private Sub UserForm_Initialize()

With ListBox1
    .AddItem "MBA"
    .AddItem "MCA"
    .AddItem "MSC"
    .AddItem "MECS"
    .AddItem "CA"
End With


With ListBox2
    .AddItem "Test 1"
    .AddItem "Test 2"
    .AddItem "Test 3"
    .AddItem "Test 4"
End With

End Sub