엑셀 바꾸기 할때 셀 서식을 그대로 유지 하는 쉬운 방법

엑셀을 이용을 해서 바꾸기 혹은 모두 바꾸기등을 이용을 해서 텍스트를 변경을 할때가 있습니다. 그런데 원래는 텍스트 형태 인데 테스트를 변경을 하면서 텍스트가 아닌 숫자 형태로 인식이 되면서 내가 원하는 값이 아닌 다른 형태로 보이는 경우가 있습니다. 이럴때 바꾸기를 하면서 쉽게 셀 서식을 그대로 유지 할수 있는 방법을 알려 드리도록 하겠습니다. 

함수를 사용해도 되지만 매크로를 이용하면 빨라

엑셀은 하나의 문제를 해결을 할때 굉장히 다양한 방법들이 존재를 합니다. 엑셀에서 셀 서식을 그대로 유지를 하면서 값을 변경을 할때 SUBTITUTE 함수나 TEXT 함수를 이용을 하는 방법도 있지만 값을 다시 옮겨야 하거나 하는 후속 작업이 필요 할수도 있습니다. 

그래서 이번 포스팅에서는 바꾸기와 동일하게 한번에 값을 변경을 할수 있지만, 엑셀에서 처럼 바꾸기를 했을때 셀 서식이 변경이 되는 것이 아닌 그대로 유지가 되는 방법으로 매크로를 이용하는 방법으로 해보도록 하겠습니다,. 

보시는 것처럼 제가 원하는 것은 : 가 붙은 값에서 : 를 제거 하는 건데요. 찾기 및 바꾸기를 이용을 하니 앞에 숫자가 들어가 있는 경우에는 셀 서식이 테스트임에도 불구하고 값이 바뀌면서 자동으로 그냥 숫자로 들어 갑니다. 그렇다고 해당 셀 서식이 변경이 된건 아닙니다. 셀 서식은그대로 텍스트 인데요.

이렇게 되는 이유는 찾기 및 바꾸기로 값을 변경을 할때 셀 서식과 상관없이 엑셀에서 숫자로 인식이 되는 값들을 알아서 숫자로 변환을 해서 값을 변경을 해버리기 때문입니다. 

매크로를 사용을 하기 위해서 Alt + F11 키를 눌러줍니다. 그러면 아래와 같은 화면이 나오는데요. 여기에서 아래의 코드를 넣어 줍니다. 

Sub ReplaceTextKeepLeadingZeros_NoFormula()
    Dim findText As String
    Dim replaceText As String
    Dim cell As Range
    Dim originalVal As String
    Dim newVal As String

    findText = InputBox("변경하고 싶은 텍스트를 입력하세요:", "찾을 텍스트")
    If findText = "" Then
        MsgBox "찾을 텍스트가 입력되지 않았습니다.", vbExclamation
        Exit Sub
    End If

    replaceText = InputBox("바꿀 텍스트를 입력하세요:", "바꿀 텍스트")
    
    Application.ScreenUpdating = False
    For Each cell In Selection
        If Not IsEmpty(cell) Then
            originalVal = cell.Value
            newVal = Replace(originalVal, findText, replaceText)
            cell.Value = newVal
        End If
    Next cell
    Application.ScreenUpdating = True

    MsgBox "텍스트 대체가 완료되었습니다.", vbInformation
End Sub

복사 하시는 방법은 인터넷에 찾아 보시면 많이 나와 있습니다. ^^ 그리고 그대로 붙여 넣어주시면 됩니다. 그런후에 개발도구 리본 메뉴를 클릭을 하신후에 매크로를 눌러 줍니다. 매크로를 눌러주신후에 아래와 같은 창이 열리면 ReplaceTextKeepLeadingZeros_NoFormula 라고 나와 있는 항목을 클릭을하신후에 실행을 눌러 주면 됩니다.

그러면 바꾸기를 했을때 처럼 찾을텍스트와 바꿀 텍스트를 순서대로 입력을하신후에 확인을 눌러 주시면 됩니다. 

결과는 보시는 것처럼 엑셀에서 바꾸기를 했을때 처럼 숫자로 변경이 되는게 아니라 서식 그대로 유지가 되는것을 볼수가 있습니다. 매우 간단하죠?

이런 매크로는 저장을 해놓으셨다고 필요하실때 복사해서 사용을하시면 좋습니다. 이번 포스팅에서는 엑셀에서 바꾸기를 할때 강제로 숫자로 변경이 되는 현상 없이 서식 그대로 바꿀수 있는 방법에 대해서 알아 보았습니다. 그중에서 제일 깔끔한 방법인 매크로를 이용하는 방법에 대해서 알아 보았는데요. 필요하신 분들에게 도움이 되셨길 바라면서 이만 포스팅 마치도록 하겠습니다.