2013-09-27 83 views
2

我的列表框出現問題。在用戶窗體初始化事件中,我使用下面的代碼來填充它: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列。解釋字段是我使用的字段中最長的字段,但我不確定是否會看到這會成爲問題。如果任何人有一個想法,我都耳熟能詳。

回答

3

,這是因爲列表框的第一列具有0

開始你的第一個標籤應該是

Label1.Caption = RecordSelectionBox.Column(0) 

和16應該是

Explanation.Caption = RecordSelectionBox.Column(15) 
+0

是啊,我看着我的輸出只要我注意到它關閉了,我就把它拿起來了。我絕對是一個塗料。謝謝(你的)信息。 – MattB