替换选定命名范围内的值

Question

单元格A1到单元格A7已被命名为Tokyo。 单元格A1，A2，A6，A10的值为“ [ABC]”。 运行代码时，应将单元格A1，A2，A6中的值替换为“ 15迁移”，并且单元格A10的值应保持为“ [ABC]”，因为它不在指定的范围内。

我尝试了以下操作，但它也替换了命名范围之外的值：

For Each cell In Range("Tokyo")
    Cells.Replace What:="[*]", Replacement:="[15  Migration]", LookAt:=Part, SearchOrder:=ByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Next cell

Answer 1

1. 不需要循环-只需使用Range.Replace 。
2. 真正的问题是Cells.Replace引用ActiveSheet 所有单元格，因此替换将在所讨论的范围之外进行。
3. 请注意，您需要xlPart和xlByRows ，而不是Part和ByRows 。 有关更多详细信息，请参见Range.Replace文档。

---

Range("Tokyo").Replace What:="[*]", Replacement:="[15  Migration]", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False