Excel:一次更改多个公式?

Excel:一次更改多个公式?,excel,formula,Excel,Formula,我使用“数据”选项卡下的小计工具将一大块数据排序到小计字段中。但是,您只能选择一个要应用的公式 如何根据小计(1,范围)对其中一列应用单独的公式?到目前为止,我已经用小计(9,范围)填充了它,但是有没有更快的方法来选择所有这些并将“9”更改为“1” 选择列 按CTRL+H 查找内容:小计(9 替换为:小计(1 单击“全部替换” 假设您的公式在A1:A5范围内 按Alt+F11打开VBE,并在同一工作簿的常规模块中输入以下代码 Function GetFormula(Cell As Range)

我使用“数据”选项卡下的小计工具将一大块数据排序到小计字段中。但是,您只能选择一个要应用的公式

如何根据小计(1,范围)对其中一列应用单独的公式?到目前为止,我已经用小计(9,范围)填充了它,但是有没有更快的方法来选择所有这些并将“9”更改为“1”

  • 选择列
  • 按CTRL+H
  • 查找内容:
    小计(9
  • 替换为:
    小计(1
  • 单击“全部替换”

  • 假设您的公式在A1:A5范围内

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

    Function GetFormula(Cell As Range) As String
       GetFormula = Cell.Formula
    End Function
    
    我从你那里得到了这个密码

    有关如何在模块中插入此代码的说明,请参阅

    现在,您可以提取公式。在助手列中使用此公式,例如B列

    =SUBSTITUTE(GetFormula(A1),"(1,","(9,")
    
    现在将此公式复制到需要的位置,并仅将粘贴值复制回需要的位置

    您还可以使用此技巧修改所需的任何其他公式,因此我建议您将这段代码放在手边:)