excel运行宏后无结果也不提示错误时啥原因？

Posted 2023-03-21

Sub test()Dim i As IntegerDim j As IntegerFor i = 1 To 100For j = 1 To 100If Worksheets("现金流量表2010").Cells(i, 5).Value = Worksheets("现金流量表2010").Cells(j, 1).Value Then Worksheets("现金流量表2010").Cells(j, 3).Value = Worksheets("现金流量表2010").Cells(i, 7).Value: Worksheets("现金流量表2010").Cells(j, 4).Value = Worksheets("现金流量表2010").Cells(i, 6).Value: Exit ForElse
End IfNext jNext iEnd Sub

图片中是原始数据，求大神帮忙解答啊。

我试过了，可以用的啊，我没有改一个代码。

运行后，C列和D列就有数据了。如图：

建议你：1、看表的名字是否为：现金流量表2010

2、再看A和E列，格式上是否有特殊情况。

参考技术A 只从图片上来看，A 的数据和 E 列的数据是不一样的。我的感觉是 A 列的单元格不是居中，所以基本上是靠左排列。但没有到最左边，说明最左面通常是有空格存在。
若真的是这样的话，IF 块的条件永远不成立。本回答被提问者采纳 参考技术B 为什么要用宏，用公式还快点
在C2输入=VLOOKUP($A2,$E:$G,3,)
D2输入=VLOOKUP($A2,$E:$G,2,)
然后往下拉填充