需要選擇WorkBOOK中的所有單元格以將所有「=」替換爲「####」

Question

我需要Excel VBA代碼來選擇工作簿中的所有單元格（不是工作表）。有很多Sheets（「Name」）。單元格但我沒有看到工作簿中所有單元格的簡單方法。我需要用「####」替換工作簿中的單元格中的所有「=」。感謝所有幫助

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，請記住取消選中「匹配整個單元格內容」。