Vba 替换工作表中单元格的值

我需要一个宏，它接受“I2”中的值，并用空格键“”替换表中的所有位置，然后转到“I3”并执行相同的操作直到~“I6000”，如果可能，旋转直到“Z6000”。重要提示：如果可能，它应该只删除确切的值，因此如果有“5”，它应该只删除其中“5”作为字符串，而不接受“5675”把它变成“67”

编辑：我在一个单元格中有不止一个值示例：“ValueC ValueZ Value5 95 C-69”

我有以下代码：

Range("I2").Select
Application.CutCopyMode = False
Selection.Copy
Cells.Replace What:=I2, Replacement:="", LookAt:=xlPart, _
    SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
    ReplaceFormat:=False

End Sub  

我如何将其更改为通过“L2”-“Z6000”

带有突出显示的excel屏幕截图示例

---

用户遵循代码，它将完成您的工作

 Sub fillValue()

cellValue = Range("I2").Value

For i = 1 To 6000    'increase this value to add more rows
compareValue = Range("A" & i).Value
if compareValue = cellValue then
Range("A" & i).Value = ""
end if

compareValue = Range("B" & i).Value
if compareValue = cellValue then
Range("B" & i).Value = ""
end if


'Add as many column as you want.


Next
End Sub

在excel中，不能为宏指定单个键。您必须使用Ctrl键组合来分配它，如下图所示

---

您好，谢谢您的帮助，它告诉我有一个语法错误sub fillValue（）用黄色填写，End sub（）标记为redI已更新代码。您只需删除。。。。我放置了这些点，这样你就可以添加任意多的列了现在它工作了，但它只是在我定义的任何地方填充了I2值，我需要它在“I2”中取值，并在表中的任何地方替换/删除它。抱歉，如果我的英语不太懂D：在我尝试这个之前，它会删除确切的值吗？示例：在D95中，我有“ValueC Value3 35 96 Value5”，如果在I2中是“5”，它会将我的D95变为“ValueC Value3 3 96 Value5”吗？您的评论不够清楚。可以将这些值的屏幕截图突出显示您想要的内容，以便我可以为您提供所需的确切代码。更新你的问题和这个屏幕截图。一定会喜欢它被降级的方式。。。我的英语不是很好，很抱歉，如果我不能很好地解释它，我会尽力。。。