1. FAQ
  2. 엑셀(Excel)
  3. AfterEffects
  4. Premiere
  5. Photoshop
  6. ETC

이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.

구글에서 검색하다가 한글 제외라는 VBA 코드를 발견했습니다

저는 영어만 지우려고 하는데

원래 코드가


 Option Explicit

Function 한글제외(strData As String)

    Dim i As Integer
    Dim intLen As Integer
    Dim strX As String
    Dim strTemp As String
    
    intLen = Len(strData)
    
    For i = 1 To intLen
        strX = Mid$(strData, i, 1)
        Select Case strX
            Case "ㄱ" To "ㅎ", "가" To "힣", " "
            Case Else
                strTemp = strTemp & strX
        End Select
    Next i
    
    한글제외 = Application.WorksheetFunction.Trim(strTemp)

End Function


이렇게 되있고 제 생각에는 이 코드를


 Option Explicit

Function 한글제외(strData As String)

    Dim i As Integer
    Dim intLen As Integer
    Dim strX As String
    Dim strTemp As String
    
    intLen = Len(strData)
    
    For i = 1 To intLen
        strX = Mid$(strData, i, 1)
        Select Case strX
            Case "a" To "z", " "
            Case Else
                strTemp = strTemp & strX
        End Select
    Next i
    
    한글제외 = Application.WorksheetFunction.Trim(strTemp)

End Function


로 바꾸면 될 것 같았는데 안되네요 ㅜㅜ

한글 제외 코드도 그냥 복사해서 붙여넣기 했는데 안되네요 ㅜㅜ 

아시는분들께서 가르쳐주시면 감사하겠습니다!!


댓글 '1'

profile

[레벨:30]아별

2015.02.24 09:13:44
*.132.210.135

초보배움님..

영어를 제외시키려면 코드를 그렇게 수정하시면 되긴 하는데요..


저건 엑셀 시트에 있는 모든 셀을 대상으로 하는 것이 아니라..

사용자 정의 함수라고.. 특정 셀의 내용을 참조해서 원하는 값을 계산해주는 함수를 작성한 것입니다.


아래 이미지처럼 사용하시면 되는 코드입니다.

abyul.com_088.jpg


도움이 되셨기를..


첨부
문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수sort
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 81247

엑셀일반 저.. 혹 이기능에 대한 단축키가 있나요?? imagefile [3]

엑셀에서 특정일자 구하는 함수식좀 부탁드립니다. file [1]

엑셀에서 구름마크 [2]

  • [레벨:1]daincs
  • 2011-01-12
  • 조회 수 6432

도형색깔을 시간에 따라 자동으로 변화게 하는법 file [3]

  • [레벨:6]ryanoh
  • 2010-04-05
  • 조회 수 6432

엑셀 웹 쿼리 질문드립니다. [6]

  • [레벨:1]페니
  • 2009-12-16
  • 조회 수 6424

엑셀 차트 관련 질문인데요.. imagefile [1]

  • 홍승
  • 2009-08-24
  • 조회 수 6422

엑셀일반 안녕하세요 재고의 연령분석에 대해 질문드립니다. file [2]

엑셀을 사용해 교육 대상자 중에 신청자를 가려내고 싶은데.. 알려주세요. ㅠㅠ file [2]

  • 초보
  • 2009-07-02
  • 조회 수 6410

abyul Excel Tool관련 문의 [1]

기타 인쇄매수 설정을 바꾸고 저장해도 계속해서 안 바뀐다면? file [3]

[문의드릴께요]엑셀 창끼리 alt+tab으로 전환이 안됩니다. file [1]

VBA 엑셀 내용에서 영어만 모두 제거할 수 있을까요?? [1]

엑셀 수식중에 =+HY/D7와 같은 =+수식의 의미가 무엇인가요? [1]

재고관리에 대해 아별님께 도움을 구합니다, file [1]

.질문.... [5]

[엑셀관련 질문] Excel파일內 개체삽입 관련.. [2]

  • [레벨:1]Jay
  • 2009-07-07
  • 조회 수 6336

엑셀일반 최대값, 최소값 범위 지정 file

엑셀관련해서 여쭈어 보고 싶습니다... file [1]

  • [레벨:1]사물
  • 2009-07-01
  • 조회 수 6314

엑신께 질문합니다!!!!! [2]

엑셀일반 공백을 활용한 함수 _ 텍스트 나누기 수식으로 나누기 file [1]

  • [레벨:4]요셉
  • 2013-01-18
  • 조회 수 6299