Excel VBA userform texbox輸入錯誤

我正在嘗試創建一個宏，它將輸入寫入userform文本框中的任何內容到活動單元格中。但是，無論何時我嘗試運行代碼的那部分，我都會得到一個錯誤438.下面是調試中顯示的部分示例。Excel VBA userform texbox輸入錯誤

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

2017-06-19 Reuben Tan

不應該'Caption'是'Text'或'Value'？ AFAIK，文本框沒有標題。 – YowE3K

錯誤438表示該對象不支持該屬性或方法。 Textbox.Caption不存在。對於方法的完整列表/屬性看MSDN TextBox Properties

關於如何解決你的代碼： ActiveCell.Value = UserForm2.Controls("TextBox" & i).Value 或 ActiveCell.Value = UserForm2.Controls("TextBox" & i).Text

2017-06-19 05:51:39

回答