Microsoft Excel에서 VBA를 사용하여 텍스트 문자열에서 N 번째 말씀을 추출하는 방법을
이 기사에서는 텍스트 문자열에서 n 번째 단어를 추출하는 방법을 배웁니다. VBA 코드를 사용하여 UDF를 만들어 문자열에서 n 번째 단어를 찾습니다.
아래 단계를 따라야합니다 :
개발자 탭을 클릭하십시오. 코드 그룹에서 Visual Basic을 선택하십시오
-
삽입을 클릭 한 다음 모듈
-
이렇게하면 새 모듈이 생성됩니다.
모듈에 다음 코드를 입력하세요
함수 ExtractNthWord (x는 문자열, y는 정수)
Dim word () As String
Dim wordCount As Long
단어 = VBA.Split (x, “”)
wordCount = UBound (word)
If wordCount <1 Or (y-1)> wordCount Or y <0 Then
ExtractNthWord = “”
그렇지 않으면
ExtractNthWord = 단어 (y-1)
End If
끝 기능
새 UDF 수식이 ExtractNthWord라는 이름으로 생성됩니다. 두 개의 매개 변수가 있습니다. 첫 번째는 데이터를 추출해야하는 조회 셀이고 두 번째는 n 번째 숫자입니다.
다음은 데이터의 스냅 샷입니다.
-
A 열에서 2 ^ nd ^ 단어를 검색하려면 공식은
= ExtractNthWord (A2,2)
-
마찬가지로 3 ^ rd ^ 단어를 추출하려면 공식은
= ExtractNthWord (A2,3)
-
헬퍼 셀을 사용하여 두 번째 인수의 값을 저장할 수 있습니다. 이렇게하면 결과를 더 빨리 볼 수 있습니다.
-
여기서 헬퍼 셀은 D1로 출력으로보고 싶은 단어의 n 번째 숫자를 입력 할 수 있습니다.
이제 D1 셀의 숫자 만 변경하면 결과가 자동으로 변경됩니다.