출처 : http://www.iexceller.com/
관련 게시물 : http://www.iexceller.com/MyXls/Lectures/X0361.zip

관련 파일 다운 받기 : X0361.zip


문자열과 숫자가 혼합된 셀이 A2셀에 있을 경우,
=MID(SUM(MID("01"&A2,LARGE(IF(ISNUMBER(MID("01"&A2,ROW($1:$100),1)*1),ROW($1:$100),1),ROW($1:$100)),1)*POWER(10,ROW($1:$100)-1)),2,100)
를 입력하고, Ctrl+Shift+Enter를 누른다.

배열함수를 이용하여 숫자만 추출하는 방식이다.

문자열에서 문자 하나씩 떼어내어 배열로 만드는 배열함수는 아래와 같다.
=MID(A2,ROW(INDIRECT("A1:A"&LEN(A2))),1)




참고로..
매크로(VB)를 이용하여 사용자 정의 함수를 정의하여 숫자를 추출하는 방법은 아래와 같다.
관련 게시물 : http://www.iexceller.com/MyXls/Lectures/X0107.zip

 Function 숫자만(문자열) As Variant
    Dim strTemp As String
    Dim intNum As Integer
   
    For intNum = 1 To Len(문자열)
        If IsNumeric(Mid(문자열, intNum, 1)) Then
            strTemp = strTemp & Mid(문자열, intNum, 1)
        End If
    Next intNum
    숫자만 = strTemp
End Function




profile