如何使用先前定义的自定义函数在VBA中定义单元格公式

Question

在模块中，我定义了自定义函数SumByCurrency。在另一个例程中，我想使用此自定义函数在单元格中定义公式：Cells(i, j).Formula = "=SumByCurrency(MyString;MyRange)"。但是运行此例程总是以运行时错误结束。这似乎是excel处理事件的方式。 有没有人知道如何解决这个问题？ 感谢

Answer 1

语法，我认为这是错误的：

Cells(i, j).Formula = "=SumByCurrency(""" & MyString & """," & MyRange & ")"

如果 MyString＆amp; MyRange 是代码中的var ...
功能应在模块和公共...中 注意：如果我使用＆＃34;;＆＃34;我收到错误而不是＆＃34;，＆＃34;。 VBA为我转换，但不接受我直接使用。 （取决于配置）。