excel - 需要选择工作簿中的所有单元格以将所有“=”替换为“####”

Question

我需要 Excel VBA 代码来选择我的工作簿（不是工作表）中的所有单元格。有很多 Sheets("Name").Cells 但我没有看到工作簿中所有单元格的简单方法。我需要用“####”替换工作簿中单元格中的所有“=”。感谢所有的帮助

Answer 1

VBA解决方案

Option Explicit

Sub ReplaceAllValues()

    Dim TheSheet        As Worksheet
    Dim MatchCase       As Boolean


    For Each TheSheet In Worksheets
        TheSheet.Cells.Replace _
            What:="=", _
            Replacement:="####", _
            LookAt:=xlPart, _
            MatchCase:=False
    Next

End Sub

• Alt + F11 打开 VB 编辑器
• 菜单插入 -> 模块
• 输入您的代码
• 保存代码（启用宏的 excel）
• 按 F5（或菜单运行 -> 运行子/用户窗体）

内置替换解决方案

如果你想使用内置的查找和替换：

如果您有例如=a1+b1并且您甚至想将其替换为 ####a1+b1 ，请记住取消选中“匹配整个单元格内容”。