删除多个单元格中的文本

Question

我无法正确删除Excel中列中多个单元格中的文本。 表格如下：

123 456 7|
123 456 7|
123 456 7|

我只是想摆脱123 456.（顺便说一句，123 456 7都在一个单元格中）

我认为我的代码中存在错误：

Sub RemoveText()

Dim cell As Range

For Each cell In Range("A1:A3")
    cell.Value = Replace(cell.Text, "123 456", "", Count:=2)
Next

End Sub

Answer 1

您还需要在替换功能

中使用cell.Value

Sub test()

Dim rng As Range
Set rng = Range("A1:A3")

For Each cell In rng
    cell.Value = Replace(cell.Value, "123 456", "")
Next cell

End Sub

Answer 2

无需循环或.value与.text。简单的一个班轮将做：

Range("A1:A3").Replace "123 456","",xlPart

请注意，在公式重量级或数据密集型范围内使用时，替换功能可能会占用资源。