找到"abc"，替换为"abc"+####

Question

我有一个包含"abc1234“、"abc2345”、"abc3456“等内容的数据集。

"abc“部分是常量和我找到它们的方法。

但当我找到它们时，我想替换/删除常量部分和变量部分的3个字符。

例如，Find "abc"-> = "abc1234“->将"abc123”替换为"“。

我试着用下面这样的东西来做。使用#作为每个变量位置/字符的通配符。但不起作用。

Selection.Replace what:="abc", Replacement:=""+###, _
LookAt:=xlPart, SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat _
:=False, ReplaceFormat:=False

我做错了什么？

Answer 1

嗯，你必须把通配符放在搜索模式中，而不是替换模式中。此外，对于单个字符，通配符是?

Selection.Replace what:="abc???", Replacement:="", _
   LookAt:=xlPart, SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat _
   :=False, ReplaceFormat:=False

'input   -> output
'abc1234 -> 4
'abc2345 -> 5
'abc3456 -> 6

Answer 2

你有没有尝试过函数replace()？

Replace("abc1234"，"abcd123"，"")得到4

Answer 3

另一种不需要搜索和替换的可能性：

Dim ra As Range
For Each ra In Selection
    If Left(ra.Value, 3) = "abc" Then
ra.Value = Mid(ra.Value, 7, 50)
    End If
Next

处理我的Excel