是否使用VBA替换整本书中Excel公式中某些内容的所有实例

Question

在每一个公式中，每一张纸的每一个单元格，整本书，我想替换部分公式字符串，更改所有"至"-&"；，如果我有一个特定的工作簿对象xlWb，在VBA中有一种简单的方法可以做到这一点吗？

我正在尝试：

xlWb.Cells.Replace What:="+", Replacement:="-", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False, FormulaVersion:=xlReplaceFormula2

但是得到"；对象不支持此属性或方法"；

Answer 1

工作簿没有单元格，只有工作表有。这会导致运行时错误。你的替换命令本身看起来还可以。

只需循环浏览工作簿中的所有工作表就可以了：

Dim ws As Worksheet
For Each ws In xlWb.Worksheets
ws.Cells.Replace What:="-", Replacement:="+", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False _
, FormulaVersion:=xlReplaceFormula2
Next

(如果我在哪里，我会在运行宏之前备份工作簿…(