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

此代碼有關如何在一個模塊中插入此代碼，請參見「如果把代碼」部分在http://www.cpearson.com/excel/writingfunctionsinvba.aspx

現在，你可以提取公式說明。使用這個公式中的一個輔助柱，說B列

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

現在複製這個公式高達你需要在哪裏，並在需要複製粘貼值僅回。

您也可以使用這種伎倆來修改你需要的任何其他公式，所以我建議你保持得心應手這個代碼片段:)