공지 |
공지
[공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요..
![image image](http://abyul.com/zbxe/modules/document/tpl/icons/image.gif)
|
아별 |
2015-04-23 |
136985 |
102 |
엑셀일반
단축키가 안됩니다(찾기,Ctrl+F) ,Ctrl+G
[3]
|
맑은이슬 |
2013-03-26 |
8951 |
101 |
엑셀일반
안녕하세요 재고의 연령분석에 대해 질문드립니다.
[2]
|
최영석 |
2013-12-19 |
8980 |
100 |
VBA
랜덤 출력 관련 짧고 간결(?)한 3가지 질문입니다. _ 중복 없는 랜덤 패스워드 생성하는 방법..
[4]
|
파이스 |
2011-11-29 |
9008 |
99 |
VBA
특정값이 변경될 경우 매크로실행 또는 0이 아닐경우 실행
[2]
|
jmsynn |
2014-10-24 |
9015 |
98 |
SUMIF
특정문자 포함하는 셀에서 값을 더할 때 관련 질문입니다.
[3]
|
별바라기 |
2013-03-01 |
9020 |
97 |
VLookup
Vlookup 사용 시 수식이 걸려 있는 데이터의 #N/A 표시 해결
[1]
|
읍내꽃미남 |
2011-10-07 |
9031 |
96 |
셀서식(표시형식)
사용자 정의 셀서식에 대해서
[1]
|
양다원 |
2009-07-22 |
9090 |
95 |
엑셀일반
2교대 근무표 엑셀로 작성하려고 하는데 도와주세요
|
편한세상 |
2013-08-21 |
9091 |
94 |
엑셀일반
최대값, 최소값 범위 지정
|
읍내꽃미남 |
2015-01-20 |
9114 |
93 |
엑셀에서 어떤셀값의 중간부분만 봐서 중간값에 따라 앞셀의 값이 변하게 하려면
[5]
|
마음의눈 |
2010-02-01 |
9151 |
92 |
SUBTOTAL
행 갯수 세기
[4]
|
랄랄라99 |
2013-08-07 |
9163 |
91 |
VBA 파일&폴더
ExecuteExcel4Macro로 다른 파일 열지않고 셀 데이터 가져오기 시 실패
|
소주보이 |
2014-02-28 |
9222 |
90 |
엑셀일반
혹시 입력된 데이터숫자 사이에 - << 이걸 집어 넣을수 잇나요?
[1]
|
월계몽키 |
2015-02-24 |
9239 |
89 |
피벗테이블 월별 합계 금액 구하는 법
[1]
|
야옹이 |
2010-02-12 |
9294 |
88 |
피벗테이블
팁부탁드립니다.
[1]
|
kkabo |
2009-07-23 |
9297 |
87 |
VBA
조건문을 변수화 하는 방법
[2]
|
엑셀대단해 |
2012-07-23 |
9310 |
86 |
VLookup
vlookup을 이용하여 하이퍼링크 가져오기
[2]
|
영우세령아빠 |
2013-04-11 |
9321 |
85 |
시트별 합계 방법
[4]
|
이구람 |
2010-04-02 |
9390 |
84 |
셀 서식에서 원하는 서식으로 고정하기
[3]
|
kwihan |
2009-07-02 |
9404 |
83 |
엑셀일반
셀안의 텍스트에.......
![image image](http://abyul.com/zbxe/modules/document/tpl/icons/image.gif)
[6]
|
월계몽키 |
2014-11-26 |
9407 |
엑셀의 기본기능으로 해결하자면.. 미친짓이구요..
사용자 정의 함수를 만들어서 사용하시는게 좋을 것 같습니다.
사용자 정의함수라함은.. 엑셀의 VBA를 이용해서 사용자가 함수를 정의해서 사용하는 것입니다.
첨부파일을 참고하시기 바랍니다.
abyul_20091230_removeKorean.xls
첨부파일에서는 한글제외()라는 함수를 이용했습니다.
한글제외()라는 함수는 아래의 코드로 정의되었구요.
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