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
框中,然后单击获取名称的相应单元格,可以更轻松地完成。