我需要完整的解决方案,通过文本框创建多个输入模板,并与自定义文本链接在后端。一旦所有的领域都进入我需要完整的信息显示和复制。
例如文本框1:保险,文本框2:电话号码和文本框3:代理名称
输出应为
调用“输入从文本框1”与电话号码“输入从文本框2”和发言“输入从文本框3”
需要解决方案,如果我不能复制消息从msg框选项。我是一个非常新的VBA和刚刚看到一个简单的视频创建下面的解决方案
Private Sub CommandButton1_Click()
Dim Insurance As String
'get the data from the textbox
Insurance = TextBox1.Text
Dim Phone As String
Phone = TextBox2.Text
Dim agent As String
agent = TextBox3.Text
'create the writeup
'add your code here to manipulate the data
'display the writeup in a message box
MsgBox "Notes: Called" & Insurance, "with phone number" & Phone, "and spoke to" & agent
End Sub
在MSGBOX行中收到错误。
1条答案
按热度按时间6ss1mwsb1#
MsgBox
需要完整的消息文本作为第一个参数。第二个参数(可选)定义了要显示的消息框类型(图标、按钮),并且是一个数值。有关详细信息,请参见documentation但是你写了
当你仔细查看这个命令时,你会发现你正在传递3个字符串作为参数,用逗号分隔:
所以你传递给
MsgBox
的第二个参数是一个String,而函数需要一个数字,因此你会得到一个类型不匹配的错误。只需将命令更改为
现在消息的片段都被连接起来,结果是一个字符串。