엑셀 특수문자 & 한글 일괄 삭제 방법

본문 바로가기

엑셀 특수문자 & 한글 일괄 삭제 방법

작성일 2013.04.11댓글 1건
    게시물 수정 , 삭제는 로그인 필요

 엑셀에서 특수문자와 한글만 추출해서 일괄 삭제하고 싶습니다.

 

 

찾기 -> 바꾸기로 현재 사용하고 있는데 그 방법이 아닌, 전체 sheet에서 특수문자 & 한글만 삭제하고만 삭

제하고 싶어요

 

예

chip34564&모듈sheet456 -> chip34564sheet45

 

left 함수같은건 사용 불가입니다. 왜냐하면 특수문자와 한글이 특정한 룰이 없이 기입되어있기 때문입니다.

 

엑셀 고수님 부탁드려요..


#엑셀 특수문자 단축키 #엑셀 특수문자표 #엑셀 특수문자 제거 #엑셀 특수문자 찾기 #엑셀 특수문자 모음 #엑셀 특수문자 바꾸기 #엑셀 특수문자 안됨 #엑셀 특수문자 파이 #엑셀 특수문자 오류 #엑셀 특수문자 제거 함수

profile_image 익명 작성일 -

영자와 숫자만 남기는 내용입니다.

transdata 이용하면 됩니다.

 

 Sub TransData()
    Dim vDB
    Dim i As Long, j As Long
    vDB = ActiveSheet.UsedRange
    For i = 1 To UBound(vDB, 1)
        For j = 1 To UBound(vDB, 2)
            vDB(i, j) = GetEnglish(vDB(i, j))
        Next j
    Next i
    ActiveSheet.UsedRange = vDB
           
End Sub

Function GetEnglish(rng)
    Dim vR(), n As Integer
    Dim strText As String

  
    For i = 1 To Len(rng)
        strText = Mid(rng, i, 1)
        If strText Like "[a-zA-Z]" Or strText Like "[0-9]" Then
            ReDim Preserve vR(n)
            vR(n) = Mid(rng, i, 1)
            n = n + 1
        End If
    Next i
    GetEnglish = Trim(Join(vR, ""))
End Function

연관된 질문 답변 리스트

엑셀 특수문자 이하 일괄 삭제

오만개의 행을 정리해야되는데 함수로 일괄적으러 삭제 하는 방법이 없을까요?? 물음표(?)이하는 모두 삭제해야됩니다. 가르침 부탁드립니다. 안녕하세요? 만족한 답변이...

엑셀 특수기호 일괄삭제방법이 있을까요?

... 제거하고 순수 텍스트만 정리할수 있는 방법이 있을까요?? 컨트롤+F 찾기기능입니다. 거기서 바꾸기에 없앨 특수문자를 넣고 바꿀단어에 빈공란 으로 두면 일괄삭제됩니다.

엑셀에서 * 일괄로 삭제하거나 변경하는법

엑셀에서 * 일괄로 삭제하거나 변경하는법 알수 잇을까요? 23213*네이버 이런식으로 셀에 구성되어있는데, 한글만... 방법이 없을까요? 안녕하세요? 만족한 답변이 될런지는...

오토핫키 특수문자 삭제 방법

안녕하세요 오토핫키 변수에 포함된 특수문자를 일괄 제거할 수 있나요? 아래 나열된 문자 외에는 모두 지우고 싶습니다 숫자 한글 영어 콤마(.) 쉼표...

혼합문서에서 한글 일괄삭제 방법...

... 중에 "특수문자"의 세부 항목을 보니 영어를 일괄적으로 찾는 기능은 있더군요. 그래서 한글은 남기고 영어는 모두 삭제하는 것은 가능한 것 같은데, 그 반대 방법은...