Excel：一次更改多个公式？

Question

我使用“数据”选项卡下的“小计”工具将一大块数据分类到子总计字段中。但是，您只能选择一个公式来应用。

如何基于SUBTOTAL（1，RANGE）将单独的公式应用于其中一列？到目前为止，我用Subtotal（9，RANGE）填充它，但是有更快的方法可以选择所有这些并将“9”更改为“1”吗？

Answer 1

1. 选择列。
2. 按CTRL + H。
3. 查找内容：SUBTOTAL(9
4. 替换为：SUBTOTAL(1
5. 点击全部替换

Answer 2

假设您的公式在A1：A5

范围内

按Alt + F11打开VBE，并在同一工作簿的常规模块中输入以下代码

Function GetFormula(Cell As Range) As String
   GetFormula = Cell.Formula
End Function

我从http://dmcritchie.mvps.org/excel/formula.htm

获得了此代码

有关如何在模块中插入此代码的说明，请参阅“如何放置代码＆＃39; http://www.cpearson.com/excel/writingfunctionsinvba.aspx

部分

现在，您可以提取公式。在辅助列中使用此公式，比如列B

=SUBSTITUTE(GetFormula(A1),"(1,","(9,")

现在将此公式复制到您需要的位置，并仅将值复制粘贴到需要的位置。

您也可以使用此技巧修改您需要的任何其他公式，因此我建议您保留这段代码方便：）