excel - 检测到第一个重复实例后如何从字符串中提取文本？

Question

我想在 Excel 单元格中从字符串中提取原始短语。

例如，我在一个单元格中有这个字符串：“mary has a little lamb mary has a little lamb mary has a little lamb...”

我想提取原始短语“mary has a little lamb”。

我怎样才能做到这一点？

标签： excelvbaexcel-formula

Answer 1

假设问题实际上是关于 VBA，您可以使用 InStr(FullText, SearchedText) 来获取字符串中第一个搜索的文本字符串的位置。

Sub LambHunting()
 A = "mary has a little lamb"
 B = "mary has a little lamb mary has a little lamb mary has a little lamb..."
 C = "Mary HAD a little lamb; unfortunately mary has a little lamb no longer."
 Debug.Print "'" & A & "' is at position #" & InStr(B, A) & " in the string '" & B & "'"
 Debug.Print "'" & A & "' is at position #" & InStr(C, A) & " in the string '" & C & "'"
End Sub

回报：

'mary has a little lamb' is at position #1 in the string 'mary has a little lamb mary has a little lamb mary has a little lamb...'
'mary has a little lamb' is at position #39 in the string 'Mary HAD a little lamb; unfortunately mary has a little lamb no longer.'