(VBA) 动态使用嵌入式 excel 函数

Question

我正在尝试对数据进行后处理。我也得到了有小时分钟和秒的专栏。使用 VBA 我创建了一个循环来遍历 for 循环中的每一行。

For i = 2 To Max
Range("GE" & CStr(i + Offset)).Formula = "=TIME(AK & CStr(i + Offset);AL & CStr(i + Offset);AM & CStr(i + Offset))"
Next i

到了运行-time error 1004: Application defined or object defined error.

我们如何编辑它才能正常工作？

Answer 1

For i = 2 To Max
    Range("GE" & CStr(i + Offset)).Formula = "=TIME(AK" & CStr(i + Offset) & ",AL" & CStr(i + Offset) & ",AM" & CStr(i + Offset) & ")"
Next i

循环变量必须是"outside"您作为公式输入的字符串才能正确构建它。

这修复了代码中的拼写错误，但您应该考虑专门为工作表设置范围。

我还将您的分号更改为逗号，因为这就是此处 Excel 中 TIME 函数的工作方式，但如果您的设置不同，您可能需要恢复它。

(VBA) 动态使用嵌入式 excel 函数

(VBA) dynamic use of embedded excel functions

excel

vba

dynamic

formula