VBA Excel如何用另一个单元格值replace一部分值

我想要一个单元格,在那里有人可以input一个公式,然后使用macros来自动replace该公式中的单词与同一个表单中的正确数字。

例:
该工作表包含一个单元格(L8),其值为Weight,可以说是10另一个单元格(L10)具有Height的值,比如说20。

现在如果有人在单元格(I27)中键入类似这样的内容:(Height + 120)/ Weight我希望macros将它们的对应值replace为文本,以便我可以使用该文本作为公式并在单元格I28中显示结果。

所以细胞(I27)将显示20 + 120/10,细胞(I28)将输出该公式的结果。

这些值在L8-L14列中。

我试着用我find的解决scheme进行以下操作:

With Range("I27") .Replace What:="Weight", _ Replacement:="", _ LookAt:=xlPart, _ SearchOrder:=xlByRows, _ MatchCase:=False, _ SearchFormat:=False, _ ReplaceFormat:=False End With 

我需要以某种方式告诉它从另一个单元格取代。

我想如果我能得到代码的工作,我将能够复制每个单词我想要replace(4),然后工作的解决scheme,使用该公式输出结果在旁边的单元格。

要使用命名范围,

 1- Select the menu Formulas --> Name Manager 2- New...--> Name: Weight, RefertTo: =Sheet1!$L$8 -->OK 3- New...--> Name: Height, RefertTo: =Sheet1!$L$10 -->OK 

现在您的单元格L8名称为 “Weight”,而您的单元格L10名称为 “Height”。 您可以在任何单元格中键入此公式:

  =(Height+120)/Weight 

你得到(L10+120)/L8的结果值。

ps在步骤2和3中,通过将光标放在RefersTo框中,然后单击获取名称的相应单元格,可以更轻松地完成。