Excel: 셀에서 모든 캐리지 리턴을 제거하려면 어떻게 해야 합니까?

Excel: 셀에서 모든 캐리지 리턴을 제거하려면 어떻게 해야 합니까?

저는 제 감방에 있는 모든 마차를 없애고 싶습니다.이거 어떻게 하는 거지?

=CLEAN(A1)

정리는 텍스트에서 인쇄할 수 없는 모든 문자를 제거합니다. -- Excel 도움말 문서

셀이 A1에 있다고 가정하면 다음 공식을 사용할 수 있습니다.

=SUBSTITUTE(A1,CHAR(10),"")

캐리지 리턴에 따라 다음을 사용해야 할 수도 있습니다.char(13)대신에char(10).

셀을 선택하고, Excel의 메뉴 모음에서 데이터/텍스트 열을 클릭하고, 첫 번째 대화 상자에서 구분 옵션을 선택한 다음, 다음 단추를 클릭하고, 기타를 제외한 모든 항목의 선택을 취소하고 옆에 있는 필드에 Ctrl+J를 입력합니다(해당 상자에는 아무것도 표시되지 않습니다.그러나 열 레이아웃 차트에는 라인 피드에서 분할 중임이 표시됩니다(캐리지 리턴이 아님).Finish(마침) 버튼을 클릭합니다.

=크린(A1)

이 명령어는 수식 탭 > 텍스트 아래 Excel에서 확인할 수 있습니다.

Sub RemoveLineBreaks()
    Application.ScreenUpdating = False
    Dim rngCel As Range
    Dim strOldVal As String
    Dim strNewVal As String

    For Each rngCel In Selection
        If rngCel.HasFormula = False Then
            strOldVal = rngCel.Value
            strNewVal = strOldVal
            Debug.Print rngCel.Address

            Do

            strNewVal = Replace(strNewVal, vbLf, " ")

            If strNewVal = strOldVal Then Exit Do
                strOldVal = strNewVal
            Loop

            If rngCel.Value <> strNewVal Then
                rngCel = strNewVal
            End If
        End If
        rngCel.Value = Application.Trim(rngCel.Value)
    Next rngCel
    Application.ScreenUpdating = True
End Sub

언급URL : https://stackoverflow.com/questions/3860184/excel-how-do-i-remove-all-carriage-returns-from-a-cell