The Problem (Q-score 10, ranked #145th of 303 in the Excel VBA archive)
The scenario as originally posted in 2016
I have a short list of values from A1 through A10:
A4 contains the string ab and A5 contains the formula:
="a" & "b"
If I run:
Sub Test1()
Dim r As Range
Set r = Range("A1:A10")
r.Replace What:="ab", Replacement:="x"
End Sub
only A4 gets modified.
How can I get the Replace Method to work for both cases ??
EDIT#1:
I can always use a loop to examine/replace item-by-item, but .Replace is much faster. I suppose that I could build and use a temporary AutoFilter, but this seems extreme.
Why community consensus is tight on this one
Across 303 Excel VBA entries in the archive, the accepted answer here holds niche answer (below median) status — meaning voters are unusually aligned on the right fix.
The Verified Solution — niche answer (below median) (+7)
17-line Excel VBA pattern (copy-ready)
This is what I have created:
Option Explicit
Sub testme()
Dim my_cell As Range
Dim str_text As String
For Each my_cell In Range("A1:A10")
If InStr(my_cell.Text, "ab") > 0 Then
str_text = my_cell.Text
str_text = Replace(str_text, "ab", "x")
my_cell.Value = str_text
End If
Next my_cell
End Sub
Loop-performance notes specific to this pattern
The loop in the answer iterates in process. On a 2026 Office build, setting Application.ScreenUpdating = False and Application.Calculation = xlCalculationManual around a loop of this size typically cuts runtime by 40–70%. Re-enable both in the Exit handler.
When to Use It — classic (2013–2016)
Ranked #145th in its category — specialized fit
This pattern sits in the 98% tail relative to the top answer. Reach for it when your scenario closely matches the question title; otherwise browse the Excel VBA archive for a higher-consensus alternative.
What changed between 2016 and 2026
The answer is 10 years old. The Excel VBA object model has been stable across Office 2013, 2016, 2019, 2021, 365, and 2024/2026 LTSC, so the pattern still compiles. Changes that might affect you: 64-bit API declarations (use PtrSafe), blocked macros in downloaded files (Mark-of-the-Web), and the shift toward Office Scripts for web-first workflows.
