불행히도 Excel에서 대문자 앞에 공백을 추가하는 직접적인 방법은 없지만 사용자 정의 함수를 만들어이 작업을 해결할 수 있습니다.

1. 공백을 추가하려는 텍스트 문자열이 포함 된 워크 시트를 활성화하십시오.

2. 누르고 ALT + F11 키를 눌러 Microsoft Visual Basic for Applications 창.

3. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 다음 코드를 모듈 창.

VBA 코드 : 대문자 앞에 공백 삽입

Function AddSpaces(pValue As String) As String
'Update 20140723
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
AddSpaces = xOut
End Function

4. 그런 다음이 코드를 저장하고 닫은 다음 워크 시트로 돌아가이 수식을 입력합니다. = addspaces (A1) 데이터 외에 빈 셀에 넣으려면 스크린 샷을 참조하십시오.

5. 그런 다음이 수식을 포함 할 범위 위로 채우기 핸들을 드래그하면 모든 대문자 앞에 공백이 삽입됩니다.

셀의 선행 / 후행 / 추가 공백을 쉽게 제거

Excel 용 Kutools 공백 제거 유틸리티를 사용하면 Excel 사용자가 선택한 셀에서 모든 선행 공백, 후행 공백, 추가 공백 또는 모든 공백을 쉽게 제거 할 수 있습니다.

다음은 다른 VBA 코드가 도움이 될 수 있습니다. 다음과 같이하십시오.

1. 누르고 ALT + F11 키를 눌러 Microsoft Visual Basic for Applications 창.

2. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 다음 코드를 모듈 창.

VBA 코드 : 대문자 앞에 공백 삽입

Sub AddSpacesRange()
'Update 20140723
Dim Rng As Range
Dim WorkRng As Range
Dim xOut As String
Dim xValue As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each Rng In WorkRng
    xValue = Rng.Value
    xOut = VBA.Left(xValue, 1)
    For i = 2 To VBA.Len(xValue)
       xAsc = VBA.Asc(VBA.Mid(xValue, i, 1))
       If xAsc >= 65 And xAsc <= 90 Then
          xOut = xOut & " " & VBA.Mid(xValue, i, 1)
       Else
          xOut = xOut & VBA.Mid(xValue, i, 1)
       End If
    Next
    Rng.Value = xOut
Next
Application.ScreenUpdating = True
End Sub

3. 그런 다음 F5 이 코드를 실행하려면 사용하려는 데이터 범위를 선택할 수있는 프롬프트 상자가 나타납니다.

4. 그런 다음 OK 이 프롬프트 상자를 닫으려면 한 번에 대문자 앞에 공백이 삽입되었습니다. 스크린 샷을 참조하십시오.

Excel 용 Kutools 텍스트 추가 유틸리티를 사용하면 VBA 매크로를 무시하고 Excel에서 쉽게 대문자 앞에 공백을 삽입 할 수 있습니다.

1. 대문자 앞에 공백을 삽입 할 범위를 선택하고 쿠툴 > 본문 > 텍스트 추가. 스크린 샷보기 :

2. 텍스트 추가 열기 대화 상자에서 공백을 입력하십시오. 본문 상자에서 옵션에만 추가 선택 첫 번째 문자는 대문자입니다. 인사말 추가 만 드롭 다운 목록.

3. 클릭 Ok 다음 스크린 샷과 같이 모든 대문자 앞에 공백을 삽입하려면 버튼을 누릅니다.

노트:이 방법은 첫 글자가 대문자 인 경우 셀 시작 부분에도 공백을 추가합니다. 신청할 수 있습니다 쿠툴 > 본문 > 공백 제거 선택한 셀에서 모든 선행 공백을 제거합니다.

Excel에서 쉼표 뒤에 공백을 추가하는 방법은 무엇입니까?