0

我有一个包含以下行的功能;

targetRange.Offset(0, -2).Value = "=validate_pointLoad()"

然后,该单元格引用下面的新函数;

Public Function validate_pointLoad() As String

    Dim CallerAddr As String

    With Application.Caller
        CallerAddr = .Address
    End With

    Dim targetRange As Range
    Set targetRange = Application.Caller
    targetRange.Ofsett(0, 10).Value = "Enter Required Data"

    validate_pointLoad = "FAIL"

End Function

我需要更改调用该函数的单元格右侧 10 列的单元格的值,但我无法让它工作。调用该函数的单元格的值变为#VALUE!

我已经尝试了上述代码的一些变体,但无法正常工作,有人知道该怎么做吗?

谢谢

4

0 回答 0