문자 숫자 섞여 있는 셀에서 숫자만 추출하는 코드

팁&서식

문자 숫자 섞여 있는 셀에서 숫자만 추출하는 코드

보통은 숫자와 문자와 섞여 있다면 텍스트 나누기 기능을 이용하면 좋은데,,, 

텍스트와 숫자를 구분할수 있는 구분자가 있을 경우에 한하는 것이고 글자수가 불규칙할때는 함수를 만들어서 사용하는게 유용하다.


Function 숫자추출(n As Variant)

cnt = Len(n)

aa = ""

For i = 1 To cnt

If Mid(n, i, 1) >= "0" And Mid(n, i, 1) <= "9" Then

   aa = aa & Mid(n, i, 1)

End If

Next

숫자추출 = Val(aa)



End Function


Comments

Category
State
  • 현재 접속자 4 명
  • 오늘 방문자 87 명
  • 어제 방문자 111 명
  • 최대 방문자 491 명
  • 전체 방문자 378,399 명
  • 전체 게시물 2,708 개
  • 전체 댓글수 105 개
  • 전체 회원수 113 명
Facebook Twitter GooglePlus KakaoStory NaverBand