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

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

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

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

如何在同一UserForm中将值添加到第二个ListBox（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

最佳答案

您的意思是否类似于以下代码：

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

关于excel-vba - 如何将值添加到用户窗体上的第二个列表框，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/42618316/