未找到方法或数据成员

我运行我的代码时出现此错误。这是这篇文章的延续： 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

2011-04-14 Mike

您是否创建了一个名为reportDate1的文本框对象，或者只是复制代码？

如果没有所谓的reportDate1和对象不变量Dim版，并在模块的顶部没有Option Explicit声明则reportDate1将是一个变体，它没有标题的方法或属性在附近

东西starnge。下面是一个简单的测试用例在开发模式和运行模式下的屏幕截图。文本是一个任意字符串，不会换行。版本/操作系统可能是一个问题？我使用了Windows Excel 2010中

enter image description here

2011-04-14 19:11:43

@克里斯尼尔森：是的，我有一个名为reportDate1一个文本框。 – Mike 2011-04-14 19:19:29

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

@chris neilsen：实际上现在它只是被全部拼凑起来填满整个文本框。不在列表中。 – Mike 2011-04-14 19:33:51

，做您创建窗体上名为reportDate1对象？

2011-04-14 19:10:39 Tod

回答