상세 컨텐츠

본문 제목

엑셀셀이 숫자로 입력되어 있을 때 숫자를 문자로 일괄 변환하는 방법

데이터베이스

by 김일국 2011. 2. 8. 01:29

본문

적용 대상
요약
본 문서는 워크시트의 셀이 숫자로 입력되어 있을 때 숫자를 문자로 일괄 변환하는 방법을 설명하고 있습니다. 
추가 정보
엑셀에서는 셀 서식에서 텍스트로 지정해 주어도 실제 데이터 형식이 문자로 변경되지는 않습니다. 셀에 값이 처음 입력될 당시 지정된 서식대로 값이 저장됩니다.

방법 :
문자로 바꾸려는 범위가 연속되어 있다면 아래 코드를 적용합니다. 
ALT+F11을 눌러 Visual Basic 창을 연 후, 삽입-모듈 메뉴를 클릭해 모듈 창을 엽니다. 
모듈 창에 아래 코드를 복사합니다. 
Sub Covert2Text()
Dim Cel As Object
ActiveCell.CurrentRegion.Select
For Each Cel In ActiveCell.CurrentRegion
    With Cel
        If IsNumeric(.Value) Then
        
             .Value = "'" & .Value
        End If
    End With
Next
End Sub

엑셀 데이터가 입력된 시트로 돌아와 데이터 범위에 포함된 셀을 하나 클릭합니다. 
도구-매크로 메뉴를 클릭해 아래 매크로 이름을 선택하고 확인을 눌러 실행합니다. 
참고 현재 셀과 인접한 범위에 입력된 모든 셀의 값을 검사해 숫자로 입력된 데이터는 모두 문자로 바뀌게 됩니다. 
그러므로 숫자로 남겨두어야 하는 값이 있다면 방법 2를 적용합니다. 
방법 2
서로 떨어져 있는 셀들에 입력된 값을 바꾸어야 한다면 다음과 같은 내장 함수를 적용해야 합니다. 
도구 메뉴에서 삽입을 누르고 열을 눌러서 변경해야 할 값이 있는 셀 옆에 빈 열을 삽입합니다. 
새로 삽입된 열의 셀을 선택합니다. 
아래를 참조하여 원하는 셀 주소를 입력합니다. 
=CONCATENATE(문자로 표시된 숫자가 입력된 셀 주소) 
'여기서 CONCATENATE 함수는 문자를 결합하는 함수로 문자를 반환합니다. 

나머지 셀은 Drag & Drop으로 식을 복사합니다. 

관련글 더보기

댓글 영역