由于格式错误而导致VBA运行时错误13

时间:2020-08-19 11:10:32

标签: vba

我想向这样的收藏中添加产品编号:

colData.Add marke.Value + " " + pn.Value (Range-Objekte)

每次启动宏时,它都会在运行时错误13中运行。

如果产品编号是256-78979-0980,则一切正常。
如果产品编号类似8898686,则会发生错误。

CStr(pn.Value)不能解决问题。

我发现的唯一解决方案是更改所有PN的格式以键入文本。
然后,我需要进入单元格并按“ Enter”,然后在单元格上出现一个符号,表明该数字已被识别为文本。
之后,该宏对该单元格有效,但对其他单元格无效。

如何更改数据以使其与宏配合使用?

1 个答案:

答案 0 :(得分:1)

避免使用+进行串联。

尝试重新放置

colData.Add marke.Value + " " + pn.Value

使用

colData.Add marke.Value & " " & pn.Value