VBA列表框问题

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

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

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

这里是代码：

 Explanation.Caption = RecordSelectionBox.Column(16) 

RecordSelectionBox.ColumnCount的debug.print显示我确实有16列。 解释字段是我使用的字段中最长的字段，但我不确定是否会看到这会成为问题。 如果有人有一个想法，我全部耳朵。

Answer 1

这是因为列表框的第一列从0开始

你的第一个标签应该是

 Label1.Caption = RecordSelectionBox.Column(0) 

而十六号应该是

 Explanation.Caption = RecordSelectionBox.Column(15)