Why the "Range.Formula = " not work?

[xxing01]

I want to copy the formula from one cell/cells to another cell/cells by "Range.Formula = ".
But it not work as expected.
If I run the VBA step by step, the function will ended at "Range.Formula = " without error.

Function test1(sOURCE As Range, tARGET As Range)
    tARGET.Formula = sOURCE.Formula
    test1 = tARGET.Formula
End Function

 

[Hui]

I don't believe that you can do that in a Function

You can do it within a Sub



Have a read of

Description of limitations of custom functions in Excel - Microsoft Support

Lists the functionality limitations of user-defined functions in Excel. These functions are called by a formula in a worksheet cell and cannot change the environment of Excel. You must use the Visual Basic subroutine to change the environment.

support.microsoft.com