excel vba - 주어진 문자열에서 텍스트를 추출하는 방법

Question

셀에 다음 텍스트가 있습니다.

stackoverflow를 사용하고 있습니다.
Stackoverflow는 질문 및 답변 포럼입니다.
내가 한 줄 더 있다고 가정 해 봅시다.

이 코드를 배열로 나눕니다. 내가 특별히해야 answer till forum.

출력에서 ​​Arr[1]에서 문자열을 검색 할 수있는 방법

Arr[0] = I am using stackoverflow. 
Arr[1] = Stackoverflow is a question and answer forum. 
Arr[2] = Let’s say I have one more line. 

-answer forum

Answer 1

난 당신이 정확히 모르는 가정합니다

곳에서 단어 "대답은"단어 "포럼"즉, 그 직후 발생하지 않습니다, 그리고 발생 Arr(1) 그 변수 Arr(1)힘에는 "Stack Overflow is a question and answer site and is not a forum like so many other sites" 문자열이 포함되어 있습니다. (실제로 스택 오버플로에 대한 더 나은 설명입니다!)

Dim temp As String 
Dim result As String 
arr(1) = "Stack Overflow is a question and answer site and is not a forum like so many other sites" 

'Get everything after the first occurrence of "answer" 
temp = Mid(arr(1), InStr(arr(1), "answer")) 

'Get everything before the first occurrence of "forum" 
result = Left(temp, InStr(temp, "forum") + 4) ' + 4 because the InStr will point to the "f" of "forum" 

'result will contain "answer site and is not a forum" 

Answer 2

사용 문자열입니다.

여기서 13은 부분 문자열의 길이로 대체 될 수 있습니다. 길이가 인덱스 범위를 벗어나는 예외를 발생시키지 않는지 확인하십시오.

Answer 3

유스 케이스에 따라 가장 강력한 답변이 아닐 수도 있습니다. 그러나 right() 함수가 작동합니다.

answerString = Right(Arr(1), 13) 
'answer forum.