我需要在 c27 的每个单元格和右侧的每个连续非空单元格上运行 AddColumnofData 函数,但我得到一个“需要运行时错误 424 对象”,任何帮助将不胜感激。
Set col = Range("$C$27", Range("$C$27").End(xlToRight))
For Each c In col
AddColumnofData (c)
Next c
最佳答案
假设您已定义 AddColumnofData
作为
Sub AddColumnofData(c As Range)
...
End Sub
你的电话需要是
AddColumnofData c
(即去掉括号)
杰西对
DIM
的建议你的变量,虽然不是强制性的,但这是个好建议。适用于 col
也是。要使其强制添加 Option Explicit
到模块的顶部。
关于vba - 循环遍历一系列单元格,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/8579899/