CAD2006运行后加载插件VBA运行时出现：‘13’错误-如何解决？

软件 2024-06-25

EXCEL VBA运行时错误13 在线求帮助

错误13 是类型不匹配！最大的可能原因是 Sheet5 的 D 列并不是日期型数据。

或许 D 列的数据看起来是日期型的，但实际上是文本型的。因为日期型数据是数值型的（日期是整型的，时间是小数型的）。建议你在任意一个非 D 列的空白单元格内使用 Type 函数测试一下便知。比如：=TYPE(D2)。若返回的结果是 1，表示的是真的日期型数据；若返回的结果是2，则表示的是假的日期型数据。

截图中可以看出，D2 单元格中的日期是文本型的，而 D3 单元格的日期才是真正的日期型数据。

EXcel vba 运行时总是提示:运行时错误'13',类型不匹配

你看看MAX1是不是有定义，其数据类型和Cell(13,3)的内容会不会有不匹配。

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

搂主的意思应该是运行后，出现inputBox窗口当在inputbox窗口输入一些字符后，选择“确定”提交时，才会出现错误'13' 数据类型不匹配解决办法： Dim Dat Dat = Application.InputBox(prompt = "") 去掉Set即可因为Set可不是这样子用的呢！？

excel vba 运行时总是提示：运行时错误‘13’，类型不匹配

Set Itm =ListView1 .ListItems.Add() 改成这样试试如果这句对了，那么Itm.Text = .Cells(i, 1)这句也没问题了。实在不行就改成这样： ListView1.ListItems.Clear For i = 2 To r2 Set Itm = ListView1.ListItems.Add() With Sheet2 Itm.Text = .Cells(i, 1) Itm.SubItems(1) = .Cells(i, 2) Itm.SubItems(2) = .Cells(i, 3) Itm.SubItems(3) = Format(.Cel