데이터 스크럽하기 엑셀

Question

이것은 여기있는 모든 컴퓨터에 쉬운 방법 일 것입니다! EXCEL 텍스트 상자에 문자열을 추출하고 싶습니다. 데이터 세트는 다소 엉망입니다. 공간, 문자 및 기타 텍스트가 필요하지 않습니다. 예를 들어 :

나는 "ABC ABCABC12345D1"

       "ABC,ABCABC12345D1" 
          "KOhn!ABCABC12345D1" 
          "ABCABC12345D2 ABCABC12345D1" 
          "ABCABC12345D1ABCABC12345D1" 
          "MCDONALDABCABC12345D1" 

에서 ABC12345D1를 취할 필요하지만 그냥 밖으로 추출해야 식별자 중 하나입니다. 드래그하여 나머지 열로 끌어 당기는 수식이 있으면 좋겠습니다.

그래서 ABCABC12345D1는

이루어지는 _ _ _ 처음 세 문자는 ID를이다

_ _ _ _ _ 번째 부분은 상기 위치 태그를이다

_ _ 상기 적어도 과거가 그것이 켜져 있는지 또는 꺼져 있든간에 (나는 그 커트를 추출 할 수 있다면 살아갈 수 있습니다.)

이제 8 자 또는 10자를 올바르게 가져 가고 모든 공간을 빼내려고했지만 어떻게 이 데이터를 가져 오려면

Answer 1

정규식?

Function Regex(Cell) 
    Dim RE As Object 

    Set RE = CreateObject("vbscript.regexp") 

    RE.Pattern = "(\w{6}\d{5}\w\d)" 
    RE.Global = True 
    RE.IgnoreCase = True 
    Set Matches = RE.Execute(Cell) 

    For Each res In Matches 
     Regex = Regex & "," & res 
    Next res 
    Regex = Mid(Regex, 2) 
End Function 

ALT + F11이 포함 된 VBA 편집기를 엽니 다.
삽입 -> 모듈 위 코드를 복사하여 모듈 창에 붙여 넣습니다. VBA 편집기를 닫습니다.

Excel 시트에이 기능을 활성화하려면 =Regex(A1)을 입력하십시오.