VBA listbox问题

2013-09-27 65 views 2 likes

我的列表框出现问题。在用户窗体初始化事件中，我使用下面的代码来填充它：VBA listbox问题

RecordSelectionBox.List = WorkingCopy.Worksheets(1).Range("A2:P20").Value

哪个工作得很好。我有列宽调整，也很好。一旦用户选择了一条记录，从列表框中的一行我将一串标签的标题设置为列表框列的值。它填写标签说明1至15就好了。当它击中16我得到一个错误“无法获取列属性参数无效。”“运行时错误‘-2147024809（80070057）’”

下面是代码：

Explanation.Caption = RecordSelectionBox.Column(16)

调试RecordSelectionBox.ColumnCount的.print显示我确实有16列。解释字段是我使用的字段中最长的字段，但我不确定是否会看到这会成为问题。如果任何人有一个想法，我都耳熟能详。

2013-09-27 MattB

回答

，这是因为列表框的第一列具有0

开始你的第一个标签应该是

Label1.Caption = RecordSelectionBox.Column(0)

和16应该是

Explanation.Caption = RecordSelectionBox.Column(15)

2013-09-27 19:52:23

是啊，我看着我的输出只要我注意到它关闭了，我就把它拿起来了。我绝对是一个涂料。谢谢（你的）信息。 – MattB