Excel VBA userform texbox输入错误

Question

我正在尝试创建一个宏，它将在userform文本框中写入的内容输入到活动单元格中。但是，每当我尝试运行该部分代码时，我都会收到错误438.以下是调试中显示的部分示例。

With Selection.Font
.Bold = True
End With
ActiveCell.Value = UserForm2.Controls("TextBox" & i).Caption
ActiveCell.Offset(1, 0).Select

Answer 1

错误438表示对象不支持该属性或方法。 Textbox.Caption不存在。有关方法/属性的完整列表，请参阅MSDN TextBox Properties

关于如何修复代码： ActiveCell.Value = UserForm2.Controls("TextBox" & i).Value 要么 ActiveCell.Value = UserForm2.Controls("TextBox" & i).Text