input一个使用vba在单元格中单击显示的公式，然后在求解器中使用它

通常当我在excel上input一个公式时，它会显示当我单击单元格时，但是当我使用vba时，即使单击时也只显示值。 我需要显示公式，所以我可以用它作为求解器的目标单元格。 解算器如果只是一个值，将不起作用。

就像我使用的例子

Set srange1 = Range("B2:B" & n + 1) Sheets("Portfolio").Cells(2, 3 + n).Value = Application.Sum(srange1) 

单元格只包含一个值，所以我不能使用求解器，因为它需要一个公式。

Answer 1

使用这样的东西

 Set srange1 = Range("B2:B" & n + 1) Sheets("Portfolio").Cells(2, 3 + n).Formula = "=SUM(" & srange1 .Address & ")"