vba inputbox 运行时错误'13' 数据类型不匹配

来源:百度知道 编辑:UC知道 时间:2024/04/29 03:26:08
Sub text()
Dim Dat
Set Dat = Application.InputBox(prompt = "")
End Sub

真是奇了!
请给出完整代码,不胜感谢!

(注:声明了Dat为String后出现编译错误:要求对象)

搂主的意思应该是
运行后,出现inputBox窗口
当在inputbox窗口输入一些字符后,选择“确定”提交时,才会出现
错误'13' 数据类型不匹配

解决办法:
Dim Dat
Dat = Application.InputBox(prompt = "")
去掉Set即可

因为Set可不是这样子用的呢!?

Dim Dat 这个你要给个类型的
Dim Dat As String