2011-04-14 104 views
0

我運行我的代碼時出現此錯誤。這是這篇文章的延續: Adding a scroll bar to a label未找到方法或數據成員

我第一次創建了一個userForm,它具有從工作表中檢索信息的標籤。我想添加一個滾動條,這樣我可以在標籤中查看列表,如果它比標籤更長。我被告知嘗試一個文本框。我把這個線從我的代碼:

reportDate.Caption = reportDate.Caption & Sheets("DATA2").Range("P" & rowNum).Text & vbCrLf 

,並複製它,只是增加了一個數字1後的文本框中,以便文本框代碼:

reportDate1.Caption = reportDate1.Caption & Sheets("DATA2").Range("P" & rowNum).Text & vbCrLf 

在這條線哪裏出現錯誤(帖子的標題)。

enter image description here

回答

2

您是否創建了一個名爲reportDate1的文本框對象,或者只是複製代碼?

如果沒有所謂的reportDate1和對象不變量Dim版,並在模塊的頂部沒有Option Explicit聲明則reportDate1將是一個變體,它沒有標題的方法或屬性在附近

東西starnge。下面是一個簡單的測試用例在開發模式和運行模式下的屏幕截圖。文本是一個任意字符串,不會換行。版本/操作系統可能是一個問題?我使用了Windows Excel 2010中

enter image description here

+0

@克里斯尼爾森:是的,我有一個名爲reportDate1一個文本框。 – Mike 2011-04-14 19:19:29

+0

好吧,使用.Text屬性代替.Caption – 2011-04-14 19:21:07

+0

@chris neilsen:實際上現在它只是被全部拼湊起來填滿整個文本框。不在列表中。 – Mike 2011-04-14 19:33:51

0

,做您創建窗體上名爲reportDate1對象?

相關問題