Vba 电子表格中的运行时错误

谢谢你抽出时间。如果这有帮助的话，我已经把星星放在错误线上了

我被一个错误弄糊涂了，找不到原因。我能得到一些帮助吗？宏没有只运行一个周期，我在数据库中没有发现与前一周期相比的任何不同数据

这是调试菜单：

获取文本框的值并转换为字符串：

a = Format(.Cells(rowNum, dateCol), "dd mmm")
a = a + ", " + Str(.Cells(rowNum, actualAssetCol))

a = Format(.Cells(rowNum, dateCol), "dd mmm")
a = a + ", " + Str(.Cells(rowNum, actualAssetCol))`

获取文本框的值并转换为字符串：

a = Format(.Cells(rowNum, dateCol), "dd mmm")
a = a + ", " + Str(.Cells(rowNum, actualAssetCol))

a = Format(.Cells(rowNum, dateCol), "dd mmm")
a = a + ", " + Str(.Cells(rowNum, actualAssetCol))`

---

中的字符串连接运算符是

&

，而不是

+

。因此，请这样使用：

a = a & ", " & Str(.Cells(rowNum, actualAssetCol))`

---

尽量简化代码，使其只包含手头的问题。另外，请向我们提供确切的错误消息以及它在调试器中出现的行。'get values and convert to string for text box a=Format（.Cells（rowNum，dateCol），“dd mmm”）a=a+，“+Str（.Cells（rowNum，actualAssetCol））************确定，看起来您正在从一个单元格的月份和日期以及从另一个单元格的年份构建文本日期。你能把鼠标悬停在a上看看它现在是什么吗？您是否查看过“局部变量”窗口以了解变量的值是什么？这是真的，OP冒着添加数字而不是串联数字的风险，但在这种情况下确实有效。