VBA Excel错误424搜索文本框以显示列表框，错误显示列表框标题

Question

我正在尝试创建用户表单，以使用“ NO”，“名”，“姓”，“用户名”或“电子邮件”列中的任何一个来搜索10000条目excel中的人。

我可以搜索。但是，当列表框显示数据时，它仅显示第一列，而不显示其他4列中的任何一列。

谢谢。

Private Sub SearchCommand_Click()

Me.ResultListbox.AddItem

For a = 1 To 5

Me.ResultListbox.List(0, a - 1) = Sheet1.Cells(1, a)
Next a
Me.ResultListbox.Selected(0) = True
End sub

Answer 1

我的Excel版本自动将列表框的列号设置为1。所以我写道：

Me.ResultListbox.ColumnCount = 5