将单个单元格添加到公式中的范围

【问题标题】：Adding a single cell to a Range in a formula将单个单元格添加到公式中的范围
【发布时间】：2017-04-07 23:36:30
【问题描述】：

我有一个 Sub 可以动态选择一系列单元格，然后将该范围传递给内部收益率公式。我需要在范围的开头附加一个单元格才能使公式起作用。见下文：

Dim calcrange As Range
Set calcrange = Range(Range("B57"), Range("B57").End(xlToRight))

Range("IRR").Formula = "=IRR(" & calcrange.Address & ")"

理想情况下，我想做的是添加一个命名范围单元格“InvestmentOutlay”作为范围中的第一个单元格。 InvestmentOutlay 单元格在前一张纸上，但我希望公式运行的顺序是

=IRR(InvestmentOutlay,B57,C57, etc)

...这可能吗？

【问题讨论】：

标签： vba excel

【解决方案1】：

这样，使用Union 连接两个范围？

Set calcrange = Union(Range("InvestmentOutlay"), Range(Range("B57"), Range("B57").End(xlToRight)))

【讨论】：