Excel 에서 셀의 지정된 위치에 텍스트와 숫자로 분할 추가

Excel 에서 셀에 텍스트 추가 또는 숫자를 추가하는 작업은 매우 일반적입니다. 예를 들어 이름 사이에 공백을 추가하거나, 셀에 접두사나 접미사를 추가하거나, 주민등록번호에 대시(-)를 추가하는 경우 등이 있습니다. 이 튜토리얼에서는 Excel 에서 거의 모든 추가 시나리오를 나열하고 각각에 해당하는 방법을 제공합니다。

참고

이 튜토리얼에서는 방법을 설명하기 위해 몇 가지 예시를 만들었습니다。 아래 VBA 코드나 수식을 사용할 때 필요에 따라 참조를 변경할 수 있으며， 샘플 파일을 다운로드하여 직접 방법을 시도할 수도 있습니다。

샘플 파일 다운로드 클릭

다음 부분에서는 아래 스크린샷과 같이 각 셀의 시작 부분에 문자를 추가하는 다양한 방법을 소개합니다：

1.1 수식을 사용하여 셀 시작 부분에 추가

다음 세 가지 수식 중 하나를 선택할 수 있습니다：

수식1 연결 연산자 「&」

앰퍼샌드(&) 문자를 사용하여 여러 텍스트를 연결합니다。

「text」&cell

수식2 CONCATENATE 함수

CONCATENATE 함수는 텍스트를 연결하는 데 사용됩니다。

CONCATENATE(「text」,cell)

수식3 CONCAT 함수

이 함수는 Excel 2019, Office 365 및 Excel 온라인에서만 사용 가능한 새로운 함수입니다。

CONCAT(「text」,cell)

일반 수식에서 cell 은 접두사를 추가하려는 텍스트의 셀 참조이고, text 는 셀에 추가할 텍스트입니다。

위의 예시를 사용하여 수식 표시줄에 다음 수식을 적용할 수 있습니다：

「&」

=$E$3&B3또는=「Iphone」&B3

CONCATENATE 함수

=CONCATENATE($E$3,B3)또는=CONCATENATE(「Iphone」,B3)

CONCAT 함수

=CONCAT($E$3,B3)또는=CONCAT(「Iphone」,B3)

Enter 키를 눌러 결과를 확인한 후, 자동 채우기 핸들을 아래로 드래그하여 범위 B3:B6 의 각 셀에 적용하세요。key to get the result， then drag autofill handle down to 텍스트 추가 to each cell of range B3:B6。

1.2 플래시 필(Flash Fill)을 사용하여 셀 시작 부분에 추가

Excel 2013 이상 버전을 사용 중이라면 강력한 새 기능인플래시 필(Flash Fill)을 사용해 위에 입력한 셀을 기준으로 자동으로 셀을 채울 수 있습니다。

첫 번째 원본 데이터 옆의 셀을 선택하고 아래와 같이 접두사 텍스트가 포함된 첫 번째 데이터를 수동으로 입력하세요：

그 다음 아래 셀에서 접두사 텍스트가 포함된 두 번째 데이터를 계속 입력하세요。 입력하는 동안 회색 미리보기 목록이 나타나면Enter키를 눌러 플래시 필이 데이터를 자동으로 채우도록 허용하세요。

미리보기 목록이 생성되지 않으면 홈 탭으로 이동한 후채우기(Fill)>플래시 필(Flash Fill)을 클릭하여 수동으로 실행하세요。

1.3 VBA 코드를 사용하여 셀 시작 부분에 추가

VBA 코드에 익숙하다면 여기서 범위 내 각 셀의 시작 부분에 텍스트 추가을 추가하는 VBA 코드를 소개합니다。

1. 접두사 텍스트를 추가할 셀 범위를 선택한 후Alt+F11키를 눌러Microsoft Visual Basic for Applications창을 활성화하세요。

2. 그런 다음 나타나는 창에서삽입>모듈을 클릭하여 빈 새 모듈을 삽입합니다。

3. 아래의 VBA 코드를 새 모듈에 복사하여 붙여넣습니다。

VBA： 셀 앞부분에 추가

Sub AppendToExistingOnLeft()
Dim c As Range
For Each c In Selection
If c.Value <> "" Then c.Value = "Iphone" & c.Value
Next
End Sub

4. F5키를 누르거나 창에서실행버튼을 클릭하여VBA 코드를 실행합니다。

이제 선택한 모든 셀의 앞부분에 「Iphone」 텍스트가 추가되었습니다。

텍스트 추가을 셀 앞부분에 추가하는 것 외에도， 텍스트 추가을 셀 끝부분에 추가하는 것도 일반적입니다。 여기에서는 각 셀 끝에 단위를 추가하는 예를 아래 스크린샷과 같이 보여드립니다：

2.1 수식을 사용하여 셀 끝부분에 추가

다음 세 가지 수식 중 하나를 선택할 수 있습니다：

수식1 연결 연산자 「&」

앰퍼샌드(&) 문자를 사용하여 여러 텍스트를 연결합니다。

셀&「텍스트」

수식2 CONCATENATE 함수

CONCATENATE 함수는 텍스트를 연결하는 데 사용됩니다。

CONCATENATE(셀，「텍스트」)

수식3 CONCAT 함수

이 함수는 Excel 2019, Office 365 및 Excel 온라인에서만 사용할 수 있는 새로운 함수입니다。

CONCAT(셀，「텍스트」)

일반적인 수식에서 『셀』은 접미사를 추가하려는 텍스트가 있는 셀 참조이고， 『텍스트』는 해당 셀에 추가할 문자열입니다。

위의 예시를 사용하여 다음과 같이 수식 표시줄에 수식을 적용할 수 있습니다：

「&」

=B3&$E$3또는=B3&「Kg」

CONCATENATE 함수

=CONCATENATE(B3, $E$3)또는=CONCATENATE(B3, 「Kg」)

CONCAT 함수

=CONCAT(B3, $E$3)또는=CONCAT(B3, 「Kg」)

결과를 얻으려면Enter키를 누른 후 자동 채우기 핸들을 아래로 드래그하여 범위 B3:B6 의 각 셀 끝까지 텍스트 추가합니다。

2.2 플래시 필을 사용하여 셀 끝부분에 추가

Excel 2013 이상 버전을 사용 중이라면 강력한 새 기능인Flash Fill은 위에 입력한 셀을 기반으로 자동으로 셀을 채울 수 있습니다。

첫 번째 원본 데이터 옆의 셀을 선택하고 아래와 같이 접미사 텍스트가 포함된 첫 번째 데이터를 직접 입력합니다：

그런 다음 첫 번째 결과 아래에서 셀 활성화를 클릭하고데이터>플래시 필을 선택하면 활성 셀을 포함한 아래의 모든 셀이 자동으로 채워집니다。

2.3 VBA 코드를 사용하여 셀 끝부분에 추가

다음은 지정된 범위의 각 셀 끝에 텍스트 추가할 수 있는 VBA 코드입니다。

1. 접미사 텍스트를 추가할 셀 범위를 선택한 후Alt+F11키를 눌러Microsoft Visual Basic for Applications창을 엽니다。

2. 그런 다음 팝업 창에서Insert>Module을 클릭하여 새 빈 모듈을 삽입합니다。

3. 다음 VBA 코드를 새 모듈에 복사하여 붙여넣습니다。

VBA： 셀 끝부분에 추가

Sub AppendToExistingOnRight()
Dim c As Range
For Each c In Selection
If c.Value <> "" Then c.Value = c.Value & "Kg"
Next
End Sub

4. F5키를 누르거나Run버튼을 클릭하여창에서 VBA 코드를 실행합니다。

이제 각 셀 끝부분에 「Kg」 텍스트가 추가되었습니다。

대부분의 경우 셀 앞뒤에 텍스트 추가하는 것은 쉽지만, 셀 중간에 텍스트 추가하는 것은 다소 어려울 수 있습니다. 예를 들어 아래 스크린샷과 같이 범위 B3:B7 의 각 셀에서 두 번째 문자 뒤에 콜론(：)과 같은 구분자를 추가해야 하는 경우를 생각해 보겠습니다。

3.1 수식을 사용하여 문자열의 n 번째 문자 뒤에 추가

이 작업을 수행하기 위한 네 가지 수식을 제공합니다。 하나를 선택하여 사용하세요：

수식1 LEFT 및 RIGHT 함수 조합

LEFT(셀， n) & 「텍스트」 & RIGHT(셀， LEN(셀) -n)

수식2 CONCATENATE(CONCAT)， RIGHT 및 LEN 함수 조합

CONCATENATE(LEFT(셀， n)， 「텍스트」， RIGHT(셀， LEN(셀) -n))

또는

CONCAT(LEFT(셀， n)， 「텍스트」， RIGHT(셀， LEN(셀) -n))

수식3 REPLACE 함수

REPLACE(셀， n+1, 0, 「텍스트」)

일반적인 수식에서 『셀』은 중간에 텍스트 추가하려는 텍스트가 있는 셀 참조이고， 『텍스트』는 해당 셀에 추가할 문자열이며， 『n』은 텍스트 문자열에서 텍스트 추가하려는 위치를 정의하는 숫자입니다。

앞서 언급한 작업을 해결하려면 다음 수식을 사용하세요：

LEFT 및 RIGHT 함수 조합

=LEFT(B3, 2) & ":" & RIGHT(B3, LEN(B3) -2)또는=LEFT(B3, 2) & $E$3 & RIGHT(B3, LEN(B3) -2)

CONCATENATE(CONCAT)， RIGHT 및 LEN 함수 조합

=CONCATENATE(LEFT(B3, 2), ":", RIGHT(B3, LEN(B3) -2))또는=CONCAT (LEFT(B3, 2), ":", RIGHT(B3, LEN(B3) -2))

REPLACE 함수

=REPLACE(B3, 2+1, 0, ":")또는=REPLACE(B3, 2+1, 0, $E$3)

결과를 얻으려면Enter키를 누른 후 자동 채우기 핸들을 아래로 드래그하여 범위 B3:B7 의 각 셀에서 두 번째 문자 뒤에 텍스트 추가합니다。

3.2 플래시 필을 사용하여 문자열의 n 번째 문자 뒤에 추가

Excel 2013 이상 버전을 사용 중이라면플래시 필기능을 통해 위에 입력한 셀을 기준으로 자동으로 셀을 채울 수 있습니다。

첫 번째 원본 데이터 옆의 셀을 선택하고 아래와 같이 두 번째 문자 뒤에 콜론이 포함된 첫 번째 데이터를 직접 입력합니다：

그런 다음 첫 번째 결과 아래에서 셀 활성화를 누르고Ctrl+E키를 눌러플래시 필명령을 실행하면 활성 셀을 포함한 아래의 모든 셀이 자동으로 채워집니다。

3.3 VBA 코드를 사용하여 문자열의 n 번째 문자 뒤에 추가

이 작업은 VBA 코드로도 수행할 수 있습니다。

1. Alt+F11키를 눌러Microsoft Visual Basic for Applications창을 엽니다。

2. 그런 다음 팝업 창에서Insert>Module을 클릭하여 새 빈 모듈을 삽입합니다。

3. 다음 VBA 코드를 새 모듈에 복사하여 붙여넣습니다。

VBA： 셀 중간에 추가

Sub AddToMidduleOfString()
    Dim Rng As Range
    Dim WorkRng As Range
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
    For Each Rng In WorkRng
        Rng.Value = VBA.Left(Rng.Value, 2 & ":" & VBA.Mid(Rng.Value, 3, VBA.Len(Rng.Value) - 1)
    Next
End Sub

4. F5키를 누르거나 창에서실행버튼을 클릭하여VBA 코드를 실행합니다。 그러면 텍스트 추가할 셀을 선택하는 대화 상자가 나타납니다。

5. 확인을 클릭합니다. 이제 범위 B19:B23 의 각 셀에서 두 번째 문자 뒤에 “：“ 텍스트가 추가되었습니다。

수식이나 VBA 에 지쳤다면 강력하고 편리한 도구인Kutools for Excel를 사용해 보세요。 이 도구는텍스트 추가기능으로 도움을 줄 수 있습니다。

이 텍스트 추가 기능은 다음과 같은 작업을 수행할 수 있습니다：

• 텍스트 추가 첫 번째 문자 앞에
• 텍스트 추가 마지막 문자 뒤에
• 지정된 위치에 텍스트 추가 추가
• 확장 기능
  텍스트 추가 대문자 앞에
  텍스트 추가 소문자 앞에
  텍스트 추가 대문자와 소문자 앞에
  텍스트 추가 숫자 앞에

텍스트 추가하려는 셀을 선택한 후Kutools>텍스트>텍스트 추가를 클릭하여 텍스트 추가를 적용합니다。

4.1 텍스트 추가 첫 번째 문자 앞에 또는 마지막 문자 뒤에

텍스트 추가대화 상자에서 셀에 추가할 텍스트를텍스트텍스트 상자에 입력한 후첫 번째 문자 앞에를위치섹션에서 선택합니다。

적용또는확인을 클릭하여 추가 작업을 완료합니다。

텍스트 추가 마지막 문자 뒤에하려면 셀에 추가할 텍스트를텍스트텍스트 상자에 입력한 후마지막 문자 뒤에를위치섹션에서 선택합니다。

적용또는확인을 클릭하여 추가 작업을 완료합니다。

4.2 텍스트 추가 지정된 위치에

때로는 셀의 중간에 텍스트 추가하거나 셀 내 여러 위치에 텍스트 추가하고 싶을 수 있습니다。 아래 스크린샷과 같이 사회보장번호의 세 번째 및 일곱 번째 숫자 뒤에 구분자 “-“를 추가한다고 가정해 보겠습니다。

텍스트 추가대화 상자에서 텍스트를Text텍스트 상자에 입력하고，Specify옵션을 선택한 후 쉼표로 구분하여 위치를 텍스트 상자에 입력하고Ok또는Apply를 클릭합니다。

4.3 텍스트 추가 유틸리티의 확장 기능

일반적인 위치(시작， 끝 및 지정된 위치)에 텍스트 추가하는 것 외에도，텍스트 추가유틸리티는 텍스트 추가도 지원합니다。

• 대문자 앞에
• 소문자 앞에
• 대문자와 소문자 앞에
• 숫자 앞에

텍스트 추가대화 상자에서 텍스트를Text텍스트 상자에 입력하고，Only add to옵션을 선택한 후 아래 드롭다운 메뉴를 클릭하여 필요한 작업을 선택합니다。

텍스트 추가 기능 외에도 Kutools for Excel 에는 Excel 에서 다양한 작업을 도와주는 다른 유용한 300+ 기능이 있습니다。 지금 무료로 다운로드하세요。

이 섹션에서는 Excel 에서 특정 텍스트가 처음 나타나기 전후에 텍스트 추가하는 공식을 제공합니다。

5.1 첫 번째 특정 텍스트 앞에 텍스트 추가

예를 들어， 아래 스크린샷과 같이 셀 내 첫 번째 「price」 텍스트 앞에 「(sale)」을 텍스트 추가하고 싶다고 가정해 보겠습니다。

Excel 에서 REPLACE 및 SUBSTITUTE 함수를 사용하면 이 작업을 해결할 수 있습니다。

REPLACE 함수

REPLACE(cell,FIND(「find_text」,cell),0,「add_text」)

SUBSTITUTE 함수

SUBSTITUTE(cell,「find_text」,「replace_text」,1)

이 경우， 위의 공식을 다음과 같이 사용하세요。

=REPLACE(B4,FIND(「price」,B4),0,「(sale)」)

또는

=SUBSTITUTE(B4,「price」,「(sale)price」,1)

이 경우 공식 인수는 다음과 같습니다。

Cell: B4,

Find_text: price,

Add_text: (sale),

Replace_text:(sale)price.

Enter키를 눌러 첫 번째 추가 결과를 얻은 후， 이 공식이 필요한 셀들까지 자동 채우기 핸들을 드래그합니다。

5.2 첫 번째 특정 텍스트 뒤에 텍스트 추가

예를 들어， 아래 스크린샷과 같이 셀 내 첫 번째 콜론 “：“ 뒤에 통화 기호 「$」를 추가하고 싶다고 가정해 보겠습니다。

Excel 에서 REPLACE 및 SUBSTITUTE 함수를 사용하면 이 작업을 해결할 수 있습니다。

REPLACE 함수

REPLACE(cell,FIND(「find_text」,cell),find_text_length,「replace_text」)

SUBSTITUTE 함수

SUBSTITUTE(cell,「find_text」,「replace_text」)

이 경우， 위의 공식을 다음과 같이 사용하세요。

=REPLACE(B12,FIND(":",B12),1,「:$」)

또는

=SUBSTITUTE(B12,":",「:$」)

이 경우 공식 인수는 다음과 같습니다。

Cell: B12,

Find_text: :,

Replace_text::$.

Find_text_length:1

Enter키를 눌러 첫 번째 추가 결과를 얻은 후， 이 공식이 필요한 셀들까지 자동 채우기 핸들을 드래그합니다。

이 튜토리얼의 이 부분에서는 셀 내 각 단어 앞뒤에 문자를 추가하는 데 도움이 되는 세 가지 방법(공식， 찾기 및 바꾸기， VBA)을 소개합니다。

각 단어 앞에 문자 추가

각 단어 뒤에 문자 추가

6.1 수식을 사용하여 각 단어의 앞뒤에 문자 추가

SUBSTITUTE 함수를 사용하여 이 작업을 해결할 수 있으며， 일반적인 공식은 다음과 같습니다。

각 단어 앞에 추가

「character」&SUBSTITUTE(string, 「 」,「 character」)

각 단어 뒤에 추가

SUBSTITUTE(string,「 」,「character 」)&「character」

B3:B6 범위 목록의 모든 단어 앞에 「+」를 추가한다고 가정하고， 다음 공식을 사용하세요。

=「+」&SUBSTITUTE(B3, " "," +")

Enter키를 눌러 첫 번째 결과를 얻은 후， 자동 채우기 핸들을 아래로 드래그하여 모든 결과를 얻습니다。

B11:B14 목록의 각 단어 뒤에($)를 추가한다고 가정하고， 아래 공식을 사용하세요。

=SUBSTITUTE(B11,「 」,「($) 」)&「($)」

Enter키를 눌러 첫 번째 결과를 얻은 후， 자동 채우기 핸들을 아래로 드래그하여 모든 결과를 얻습니다。

6.2 찾기 및 바꾸기을 사용하여 각 단어 앞뒤에 문자 추가

첫 번째 단어를 제외한 각 단어 앞에 문자를 추가하거나， 마지막 단어를 제외한 각 단어 뒤에 문자를 추가하고 싶다면(아래 스크린샷 참조)， Excel 기본 제공찾기 및 바꾸기유틸리티를 사용하면 이 작업을 처리할 수 있습니다。

첫 번째 단어를 제외한 각 단어 앞에 추가

마지막 단어를 제외하고 각 단어 뒤에 추가

1. 각 단어 앞뒤에 문자를 추가할 셀을 선택한 후Ctrl+H키를 눌러찾기 및 바꾸기대화 상자를 활성화합니다。

2. Find what텍스트 상자에 공백을 입력한 후，Replace with텍스트 상자에 공백과 함께 새 문자를 입력하고， 마지막으로Replace All버튼을 클릭합니다。

여기서는 각 단어 앞뒤에 문자를 추가하기 위한 두 가지 VBA 코드를 제공합니다。 아래 단계에 따라 코드를 실행하세요。

1. Alt+F11키를 눌러Microsoft Visual Basic for Applications창을 활성화합니다。

2. 나타난 창에서Insert>Module을 클릭하여 새 빈 모듈을 삽입합니다。

3. 아래 VBA 코드를 복사하여 모듈에 붙여넣습니다。

모든 단어 앞에 추가

Sub InsertCharBeforeWord()
'UpdateByExtendOffice
Dim ws As Worksheet
Dim xRg As Range
Dim xSRg As Range
Dim xCell As Range
Dim xInStr As String
Dim xArr As Variant
Dim xValue As String
    On Error Resume Next
   
    Set xSRg = Application.Selection
    Set xRg = Application.InputBox("Select cells(continuous):", "Kutools for Excel", xSRg.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xInStr = Application.InputBox("Type characters you want to add:", "Kutools for Excel", "", , , , , 2)
    If StrPtr(xInStr) = 0 Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xArr = Split(xCell.Text, " ")
        xValue = ""
        For Each xStr In xArr
            If Trim(xStr) <> "" Then
                If xValue = "" Then
                    xValue = xInStr & Trim(xStr)
                Else
                    xValue = xValue & " " & xInStr & Trim(xStr)
                    End If
            End If
        Next
        xCell.Value = xValue
    Next
    Application.ScreenUpdating = True
End Sub

모든 단어 뒤에 추가

Sub InsertCharAfterWord()
'UpdateByExtendOffice
Dim ws As Worksheet
Dim xRg As Range
Dim xSRg As Range
Dim xCell As Range
Dim xInStr As String
Dim xArr As Variant
Dim xValue As String
    On Error Resume Next
 
    Set xSRg = Application.Selection
    Set xRg = Application.InputBox("Select cells(continuous):", "Kutools for Excel", xSRg.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
   
    xInStr = Application.InputBox("Type characters you want to add:", "Kutools for Excel", "", , , , , 2)
    If StrPtr(xInStr) = 0 Then Exit Sub
   
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xArr = Split(xCell.Text, " ")
        xValue = ""
        For Each xStr In xArr
            If Trim(xStr) <> "" Then
                If xValue = "" Then
                    xValue = Trim(xStr) & xInStr
                Else
                    xValue = xValue & " " & Trim(xStr) & xInStr
                End If
            End If
        Next
        xCell.Value = xValue
    Next
    Application.ScreenUpdating = True
End Sub

4. F5키를 눌러 코드를 실행합니다(또는)Run버튼을 클릭할 수도 있습니다)。 연속된 셀 범위를 선택하라는 대화 상자가 나타나면OK를 클릭합니다。

5. 두 번째 대화 상자에서 추가할 문자를 입력하고OK를 클릭합니다。

그러면 각 단어의 앞이나 끝에 해당 문자가 추가됩니다。

때로는 모든 문자 사이에 텍스트 추가하고 싶을 수 있습니다。 이 섹션에서는 두 가지 시나리오를 소개합니다。 하나는 모든 문자 사이에 텍스트 추가하는 것이고， 다른 하나는 각 숫자 사이에 공백을 추가하는 것입니다。

7.1 사용자 정의 함수를 사용하여 모든 문자/숫자 사이에 텍스트 추가

문자열의 모든 문자 사이에 문자를 추가하려면 사용자 정의 함수를 사용할 수 있습니다。

이 경우 모든 문자 사이에 공백을 추가합니다。

1. Alt+F11키를 눌러Microsoft Visual Basic for Applications창을 활성화합니다。

2. 팝업 창에서Insert>Module를 클릭하여 새 빈 모듈을 삽입합니다。

3. 다음 VBA 코드를 모듈에 복사하여 붙여넣습니다。

문자 사이에 텍스트 추가

Function AddText(Str As String) As String
    Dim i As Long
    For i = 1 To Len(Str)
        AddText = AddText & Mid(Str, i, 1) & " "
    Next i
    AddSpace = Trim(AddSpace)
End Function

4. 코드를 저장하고 이 창 닫기 워크시트로 돌아간 후， 결과를 표시할 셀에 다음 공식을 입력합니다。

=AddText(B3)

B3 는 문자 사이에 공백을 추가할 문자열이 포함된 셀입니다。

5. Enter키를 눌러 결과를 얻은 후， 필요에 따라 다른 셀들까지 자동 채우기 핸들을 드래그합니다。

7.2 공식을 사용하여 모든 숫자 사이에 공백 추가

문자열이 숫자 값인 경우 숫자의 각 자리 사이에 공백을 추가하려면 TEXT 함수를 사용할 수 있습니다。

B10:B12 범위에 8 자리 숫자 목록이 있고， 결과를 표시할 셀에 다음 공식을 입력한다고 가정해 보겠습니다。

=TEXT(B10,「# # # # # # # #」)

Enter키를 누른 후， 다른 셀들까지 자동 채우기 핸들을 드래그합니다。

숫자의 길이가 5 인 경우 공식은 다음과 같이 변경됩니다。=TEXT(B10,「# # # # #」).

모든 단어 사이에 문자를 추가하려는 경우， 아래 스크린샷과 같이 이름의 성(first)， 중간이름(middle)， 성 사이에 공백을 추가한다고 가정하면 사용자 정의 함수(User-Defined function)를 사용할 수 있습니다。

1. Alt+F11키를 눌러Microsoft Visual Basic for Applications창을 활성화합니다。

2. 팝업 창에서삽입>모듈을 클릭하여 새 빈 모듈을 삽입합니다。

3. 다음 VBA 코드를 모듈에 복사하여 붙여넣습니다。

단어 사이에 문자 추가하기

Function AddCharacters(pValue As String) As String
'UpdatebyExtendoffice20160908
Dim xOut As String
xOut = VBA.Left(pValue, 1)
For i = 2 To VBA.Len(pValue)
xAsc = VBA.Asc(VBA.Mid(pValue, i, 1))
If xAsc >= 65 And xAsc <= 90 Then
xOut = xOut & " " & VBA.Mid(pValue, i, 1)
Else
xOut = xOut & VBA.Mid(pValue, i, 1)
End If
Next
AddCharacters = xOut
End Function

4. 코드를 저장하고 이 창 닫기 워크시트로 돌아간 후， 결과를 표시할 셀에 아래 수식을 입력합니다。

=AddCharacters(B3)

B3 는 단어 사이에 공백을 추가하려는 문자열이 포함된 셀입니다。

5. Enter키를 눌러 결과를 얻은 후， 자동 채우기 핸들을 드래그하여 필요한 만큼 다른 결과를 생성합니다。

아래 스크린샷과 같이 텍스트와 숫자로 분할 사이에 특정 문자를 추가하려면 두 가지 방법을 제공합니다。

9.1 수식으로 텍스트와 숫자로 분할 사이에 문자 추가하기

텍스트가 숫자 앞에 있는 경우 일반적인 수식은 다음과 같습니다。

TRIM(REPLACE(string,MIN(FIND({1,2,3,4,5,6,7,8,9,0},string&"1234567890")),0,"-"))

위의 예시를 사용하여 다음 수식을 적용하세요。

=TRIM(REPLACE(B4,MIN(FIND({1,2,3,4,5,6,7,8,9,0},B4&"1234567890")),0,"-"))

Enter키를 눌러 첫 번째 결과를 얻은 후， 자동 채우기 핸들을 드래그하여 다른 셀에 수식을 채웁니다。

숫자가 텍스트 앞에 있는 경우 일반적인 수식은 다음과 같습니다。

LEFT(string,SUM(LEN(string)-LEN(SUBSTITUTE(string,{0,1,2,3,4,5,6,7,8,9},「」))))&"."&RIGHT(string,LEN(B13)- SUM(LEN(string)-LEN(SUBSTITUTE(string, {0,1,2,3,4,5,6,7,8,9}, 「」))))

위의 예시를 사용하여 다음 수식을 적용하세요。

=LEFT(B13,SUM(LEN(B13)-LEN(SUBSTITUTE(B13,{0,1,2,3,4,5,6,7,8,9},「」))))&"."&RIGHT(B13,LEN(B13)- SUM(LEN(B13)-LEN(SUBSTITUTE(B13, {0,1,2,3,4,5,6,7,8,9}, 「」))))

Enter키를 눌러 첫 번째 결과를 얻은 후， 자동 채우기 핸들을 드래그하여 다른 셀에 수식을 채웁니다。

9.2 플래시 필(Flash Fill)로 텍스트와 숫자로 분할 사이에 문자 추가하기

Excel 2013 이상 버전을 사용하는 경우，플래시 필기능을 사용하여 텍스트와 숫자로 분할 사이에 문자를 추가할 수도 있습니다。

원본 데이터 옆에 텍스트와 숫자로 분할 사이에 문자를 추가한 새로운 데이터를 입력합니다。 그런 다음 Enter 키를 눌러 첫 번째 결과의 다음 셀로 이동합니다。

그리고Ctrl+E키를 눌러 플래시 필을 활성화합니다。

확장 기능

이 튜토리얼에서는 일상생활이나 업무에서 마주칠 수 있는 텍스트 추가 관련 몇 가지 시나리오도 소개합니다。

때로는 아래 스크린샷과 같이 일련의 전화번호 또는 주민등록번호 같은 번호에 대시(-)와 같은 구분자를 추가해야 할 때가 있습니다。 수백 개의 번호에 수동으로 입력하는 것은 매우 번거로운 작업입니다。 이 섹션에서는 이 작업을 빠르게 처리할 수 있는 세 가지 유용한 방법을 소개합니다。

10.1 수식으로 숫자에 대시 추가하기

숫자에 대시를 빠르게 추가할 수 있는 두 가지 수식이 있습니다. B3 셀의 숫자에서 3 번째와 6 번째 숫자 뒤에 대시를 추가하려면 다음 수식을 사용하세요。

REPLACE 함수

=REPLACE(REPLACE(B3,4,0,"-"),8,0,"-")

TEXT 함수

=TEXT(B3,「???-???-??? 」)

Enter키를 눌러 첫 번째 결과를 얻은 후， 자동 채우기 핸들을 드래그하여 다른 셀에 적용합니다。

10.2 셀 형식 설정로 숫자에 대시 추가하기

원본 셀의 숫자에 직접 대시를 추가하려면셀 형식 설정기능을 사용할 수 있습니다。

1. 대시를 추가할 숫자를 선택한 후，Ctrl+1키를 눌러셀 형식 설정대화 상자를 활성화합니다。

2. 셀 형식 설정대화 상자에서Number탭 아래사용자 지정을범주섹션에서 선택합니다。

3. 그런 다음 오른쪽형식섹션에서 텍스트 상자에###-###-###를 입력하고확인을 클릭합니다。

이제 선택한 숫자에 대시가 추가되었습니다。

10.3 Kutools for Excel 의 텍스트 추가으로 전화번호에 대시 추가하기

Excel 에Kutools for Excel이 설치되어 있다면，텍스트 추가기능도 도움이 될 수 있습니다。

1. 대시를 추가할 숫자가 포함된 셀을 선택한 후，Kutools>텍스트>텍스트 추가를 클릭합니다。

2. 텍스트 추가대화 상자에서텍스트텍스트 상자에 대시나 다른 구분자를 입력하고，지정옵션을 선택한 후， 대시를 추가할 위치를 쉼표로 구분하여 아래 텍스트 상자에 입력합니다。

3. 확인또는 적용을 클릭하면 선택한 숫자에 대시가 추가됩니다。

30 일 무료 평가판으로 텍스트 추가을 무료로 다운로드하세요。

서로 다른 길이의 숫자 목록이 있고, 아래 스크린샷과 같이 앞에 0 을 추가하여 동일한 길이로 만들고 깔끔하게 보이도록 하려는 경우， 이 작업을 처리할 수 있는 두 가지 방법을 제공합니다。

11.1 셀 형식 설정 기능으로 셀에 앞부분 0 추가하기

앞부분에 0 을 추가하여 셀 길이를 고정하려면셀 형식 설정기능을 사용하여 사용자 지정 형식를 설정할 수 있습니다。

1. 앞부분에 0 을 추가할 셀을 선택한 후，Ctrl+1키를 눌러셀 형식 설정대화 상자를 활성화합니다。

2. 셀 형식 설정대화 상자에서Number탭 아래사용자 지정을범주섹션에서 선택합니다。

3. 그런 다음 오른쪽형식섹션에서 텍스트 상자에0000를 입력합니다(숫자 길이를 4 자리로 고정하려면 0000 을 입력하고, 다른 길이(예: 5 자리)로 변경하려면 00000 을 입력할 수 있음)。 이후확인을 클릭합니다。

이제 숫자에 앞부분 0 이 추가되어 모두 동일한 길이가 되었습니다。

11.2 수식에 앞부분 0 추가하기

원본 데이터를 변경하지 않으려면 다른 위치의 숫자에 수식을 사용하여 앞부분에 0 을 추가할 수 있습니다。

다음 세 가지 함수를 사용할 수 있습니다。

수식1 TEXT 함수

TEXT(number,「00…」)

수식2 RIGHT 함수

RIGHT(「00…」&number,length)

수식3 BASE 함수

BASE(number,10,length)

수식에 사용된 0 의 개수는 숫자의 길이와 동일합니다。

여기서 숫자 길이를 4 자리로 설정했다면， 다음 수식을 사용하세요。

=TEXT(B10,"0000")

=RIGHT("0000"&B10,4)

=BASE(B10,10,4)

Enter키를 누르고 자동 채우기 핸들을 아래로 드래그합니다。

숫자 뒤에 후행 0 을 추가하여 고정 길이로 만들고자 할 때, 예를 들어 아래 스크린샷과 같이 셀 B3:B7 의 숫자 뒤에 후행 0 을 추가하여 5 자리 길이로 만들려면 수식을 적용하여 이 작업을 처리할 수 있습니다。

REPT 함수

number&REPT("0",length-LEN(number))

이 수식에서 인수 「number」는 후행 0 을 추가하려는 숫자 또는 셀 참조을 나타내며， 인수 「length」는 원하는 고정 길이입니다。

다음과 같이 수식을 사용하세요：

=B3&REPT("0",5-LEN(B3))

Enter 키를 누른 후자동 채우기 핸들을 아래로 드래그하여 이 수식이 필요한 셀까지 확장합니다。

워크시트에서 메모장으로 데이터를 내보내거나 복사할 경우， 셀 값의 길이가 서로 달라 텍스트가 정돈되지 않게 표시될 수 있습니다。 아래 스크린샷과 같이 깔끔하게 보이도록 하려면 텍스트 뒤에 공백을 추가해야 합니다。

이 작업을 해결하기 위해 REPT 함수를 활용할 수 있습니다。

LEFT(text & REPT(「 」,max_length),max_length)

이 수식에서 인수 「text」는 후행 공백을 추가하려는 텍스트 또는 셀 참조이며， 인수 「max_length」는 텍스트를 고정 길이로 만들기 위한 값으로， 사용된 텍스트 중 최대 길이보다 크거나 같아야 합니다。

셀 B3:C6 의 텍스트 뒤에 공백을 추가하려면 다음 수식을 사용하세요：

=LEFT(B3 & REPT(「 」,10),10)

Enter 키를 누른 후자동 채우기 핸들을 이 수식이 필요한 모든 셀로 드래그합니다。

이 경우 사용된 텍스트 중 가장 긴 텍스트가 9 자이므로 여기서는 10 을 사용합니다。

때로는 아래 스크린샷과 같이 셀의 텍스트나 숫자 앞뒤에 따옴표나 괄호를 추가해야 할 때가 있습니다. 하나씩 수동으로 입력하는 것 외에도 Excel 에서는 이를 신속하게 해결할 수 있는 두 가지 방법이 있습니다。

14.1 셀 형식 설정을 사용하여 따옴표/괄호 추가하기

원본 데이터의 텍스트 앞뒤에 따옴표를 추가하려면 Excel 의 셀 형식 설정 기능을 사용할 수 있습니다。

1. 따옴표를 추가할 셀을 선택한 후Ctrl+1키를 눌러셀 형식 설정대화 상자를 활성화합니다。

2. 셀 형식 설정대화 상자에서Number탭 아래의Custom을Category목록에서 선택한 후， 우측 섹션의Type텍스트 상자에「''」@「''」를 입력하고OK를 클릭합니다。

선택한 셀의 텍스트 앞뒤에 따옴표가 추가되었습니다。

텍스트 앞뒤에 괄호를 추가하려면 셀 형식 설정 대화 상자의 Type 텍스트 상자에(@)을 입력하세요。

14.2 수식을 사용하여 따옴표/괄호 추가하기

다른 셀의 텍스트 앞뒤에 따옴표를 추가하는 데에도 수식을 사용할 수 있습니다。

& 연결자 사용

「」「」&text&「」「」

또는

char(34)&text&char(34)

이 경우 셀 B11 의 텍스트에 대해 다음과 같은 수식을 사용하세요：

=「」""&B11&""""

또는

=char(34)&B11&char(34)

Enter 키를 누른 후자동 채우기 핸들을 아래로 드래그하여 셀을 채웁니다。

텍스트 앞뒤에 괄호를 추가하려면 다음과 같은 수식을 사용하세요：「(」&text&「)」.

14.3 VBA 를 사용하여 따옴표/괄호 추가하기

이 작업을 위해 VBA 코드가 필요하다면 다음 VBA 를 참고하세요。

1. Alt+F11키를 눌러Microsoft Visual Basic for Applications창을 활성화합니다。

2. 그런 다음 팝업 창에서Insert>Module을 클릭하여 새 빈 모듈을 삽입합니다。

3. 다음 VBA 코드를 새 모듈에 복사하여 붙여넣습니다。

VBA： 텍스트 앞뒤에 따옴표 추가하기

Sub addquotationmarksorbrackets()
'UpdatebyExtendOffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
Rng.Value = """" & Rng.Value & """"
Next
End Sub

4. F5키를 누르거나 창의Run버튼을 클릭하여VBA 코드를 실행합니다。 따옴표를 추가할 셀을 선택하라는 대화 상자가 표시됩니다。

5. OK를 클릭하면 선택한 셀의 텍스트 앞뒤에 따옴표가 추가됩니다。

때로는 다른 사용자가 데이터를 더 잘 이해할 수 있도록 도와주기 위해 아래 스크린샷과 같이 수식 결과에 텍스트 추가를 포함시켜야 할 수도 있습니다。 수식에 텍스트를 포함시키려면 텍스트를 따옴표로 감싸고 & 연결자를 사용하여 텍스트와 수식을 결합하면 됩니다。

Case 1 수식 앞에 텍스트 추가 추가

「Today is 」&TEXT(TODAY(),「dddd, mmmm dd.」)

Case 2 수식 뒤에 텍스트 추가 추가하기

TEXT(NOW(),「HH:MM:SS」)&「 is the current time.」

Case 3 수식 양쪽에 텍스트 추가 추가

「Today sold 」&data&「 kg.」

---

최고의 오피스 생산성 도구

Kutools for Excel 가 대부분의 문제를 해결하고 생산성을 80% 만큼 향상시킵니다

• 슈퍼 수식 표시줄(여러 줄의 텍스트와 수식을 쉽게 편집 가능)；읽기 레이아웃(대량의 셀을 쉽게 읽고 편집 가능)；필터 범위에 붙여넣기...
• 병합된 셀/행/열및 데이터 유지； 셀 분할 콘텐츠；중복 행 결합 및 합계/평균 계산。。。 중복 입력 방지 셀；범위 비교...
• 중복 또는 고유 항목 선택행；빈 행 선택(모든 셀이 비어 있음)；슈퍼 찾기 및 퍼지 검색여러 워크북에서； 무작위 선택。。。
• 정확한 복사수식 참조를 변경하지 않고 여러 셀에 입력；자동 참조 생성여러 시트로；글머리 기호 삽입， 체크 박스 등。。。
• 자주 사용하는 수식 저장 및 빠른 삽입， 범위， 차트 및 그림；셀 암호화암호로 보호；메일링 목록 생성이메일 발송。。。
• 텍스트 추출， 텍스트 추가， 특정 위치 문자 삭제，공백 제거； 데이터 페이지 통계 생성 및 인쇄；셀 내용과 주석 간 변환...
• 슈퍼 필터(필터 설정을 저장하여 다른 시트에 적용 가능)；고급 정렬월/주/일， 빈도 등으로；특수 필터굵게， 기울임꼴 등으로。。。
• 워크북 및 워크시트 통합； 테이블 병합 기반으로 키 열；데이터 분할 여러 시트로 분할;xls， xlsx 및 PDF 일괄 변환...
• PivotTable 다음 기준으로 그룹화주차 번호， 요일 등。。。잠금 해제된 항목 표시， 선택 잠금다양한 색상으로；수식/이름이 포함된 셀 강조...

더 알아보기。。。모든 기능 30 일 무료 체험。。。구매하기。。。 

---

Office Tab - Office 에 탭형 인터페이스를 제공하여 작업을 훨씬 쉽게 만들어 줍니다

• Word, Excel, PowerPoint 에서 탭형 편집 및 읽기 활성화, Publisher, Access, Visio 및 Project 에서도 사용 가능합니다。
• 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 생성할 수 있습니다。
• 생산성을 50% 만큼 향상시키고 매일 수백 번의 마우스 클릭을 줄여줍니다！

더 알아보기。。。모든 기능 30 일 무료 체험。。。구매하기。。。