Excel多个工作表使用相同公式如何一键变更或批次变更？

Question

如题所述

Answer 1

通过vba实现

原始数据如下图：

有三张表（当然可以更多），其中sheet1的【c2】输入公式吗，这三张表格的C列列都输入同样的公式。

代码如下：

Sub 按钮1_Click()
    Application.ScreenUpdating = False '关闭刷屏
    Set Rng = [c2]
    For Each sht In Sheets '遍历各个工作表
        With sht
            For j = 2 To .UsedRange.Rows.Count '遍历相应工作表内的c列单元格
                Rng.Copy .Cells(j, 3) '拷贝公式
            Next j
        End With
    Next sht
    
    Application.ScreenUpdating = True
End Sub

执行代码后如下：

Answer 2

CTRL+H 就可以，如下图：

选项里面还可以选择在所有工作表里面替换。

追问

已经找到答案了。就是先选择你要变更的多个工作页表，在任何一个工作表作作作变更，则全部被选择的工作表就连动变更了。谢谢您的热心。

本回答被网友采纳

Answer 3

确定是工作表，不是工作薄？可以替换，替换的时候范围选择工作簿就可以了

Answer 4

修改一个公式，然后进行填充就可以了呀。公式的特性就是可以进行填充，所以才会有批量运算和处理数据的能力。追问

已经找到答案了。就是先选择你要变更的多个工作页表，在任何一个工作表作作作变更，则全部被选择的工作表就连动变更了。谢谢您的热心。

Answer 5

试试用替换方式，查找中为原公式，替换中为新公式。追问

已经找到答案了。就是先选择你要变更的多个工作页表，在任何一个工作表作作作变更，则全部被选择的工作表就连动变更了。谢谢您的热心。