引用在另一个单元格中的string中定义的单元格

我有一个工作表设置如下：

$B$13 = the string "'TopCap'!$C$12" $D$13 = the string "'TopCap'!$E$12" 

工作表TopCap单元$ C $ 12中的单元格具有Goal Seek所需的公式。 而TopCap！$ E $ 12是不断变化的单元格。

这是我的代码：

 Private Sub CommandButton1_Click() Range("$B$13").GoalSeek _ goal:=Range("$C$13").Value, _ ChangingCell:=Range("$D$13").Value End Sub 

如何编写代码使GoalSeek范围在TopCap的单元格中查找公式？ Like Range（'TopCap'！$ C $ 12）.GoSeSe _

我希望我已经描述得很好。 请问我是否需要更好地描述它。

任何援助表示赞赏。 丰富

Answer 1

你需要嵌套一些Range对象 ; 一个放置Range.Value属性 ，另一个放置第一个使用单元格的值来定义范围。

 Private Sub CommandButton1_Click() Range(Range("B13").Value).GoalSeek _ Goal:=Range(Range("C13").Value), _ ChangingCell:=Range(Range("D13").Value) End Sub 

所以Range(Range("D13").Value).Address(external:=True)将parsing为TopCap！$ E $ 12。

我已经从string单元格地址中删除了$绝对锚点。 作为string，他们不会改变，是不必要的。 这是一个私人小组，所以父母的工作表引用可能不是必要的（例如Range("D13").Value ），但包装在With … End With语句不是一个坏主意。