在Mac上查找并替换当前工作表中的一列

Question

我找到了下面的代码，它在＆＃34;在表格中搜索时效果很好。

但有时候，当我打开excel时，默认显示＆＃34;搜索工作表＆＃34;。请看图片。

然后代码将替换整个工作表而不是列（＆＃34; V＆＃34;）。

任何其他代码都可以控制这件事吗？

提前谢谢。

Sub ReplaceTitleMs()
Columns("V").Replace    What:="Ms ", _
                        Replacement:="", _
                        LookAt:=xlPart, _
                        SearchOrder:=xlByRows, _
                        MatchCase:=False, _
                        SearchFormat:=False, _
                        ReplaceFormat:=False
End Sub

Live example

所以这是我目前的代码：

Sub Test_Replace()

Worksheets("Sheet4").Columns("B").Replace What:="XXX", _
                        Replacement:="KKK", _
                        LookAt:=xlPart, _
                        SearchOrder:=xlByRows, _
                        MatchCase:=False, _
                        SearchFormat:=False, _
                        ReplaceFormat:=False
Worksheets("Sheet4").Columns("B").Replace What:="SIN", _
                        Replacement:="OOO", _
                        LookAt:=xlPart, _
                        SearchOrder:=xlByRows, _
                        MatchCase:=False, _
                        SearchFormat:=False, _
                        ReplaceFormat:=False

End Sub

选择＆＃34;在工作表中搜索＆＃34;在菜单中，运行代码。