string - Excel VBA 复杂字符串替换

Question

有没有办法找到字符串中的子字符串，然后替换该子字符串及其前后的多个字符？

例如，我有这些:

Mandatory659852 y n n TRY RACE
Mechanica888654 y n n FRY SAME
GILLETE685254 y n n CRY FACE

我可以编写 VBA 程序来删除子字符串 "y n n " 包括子字符串左侧的任意 6 个字符和右侧的任意 3 个字符吗？所以结果应该是:

"Mandatory RACE"
"Mechanica SAME"
"GILLETE FACE"

我无法在 Google 上进行搜索，因为我不知道这个词是什么。我知道我可以在 VBA 中使用 .replace 来替换子字符串，但我不知道如何按字符数使用通配符，例如 .replace(****** y n n ***)

Answer 1

VBA:

您使用 ? 来匹配单个通配符。

只需突出显示单元格并运行此宏。

您也可以在“查找/替换”对话框中使用它。

Sub FixIt()
Selection.Replace "?????? y n n ???", "", xlPart
End Sub