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

엑셀에 대해서 궁금한 것이 있으시면 마음껏 질문해주세요.

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

글 수 822

숫자 문자 비교검색

VBA 조회 수 3106 추천 수 0 2013.09.02 16:52:53
[레벨:4]열심회원 *.218.33.33

TextBox에 들어가는 값이 문자인지 숫자인지 구별을하고싶은데요.ㅠㅠ


만약 TextBox에 숫자가 들어간다면    "문자를 입력하여주세요!" 라고 msgbox 가 뜨고


문자가 들어간다면    "숫자를 입력해 주세요!"라고 msgbox가 뜨게 하고싶습니다.!! 어떻게 해야할지 모르겟어서 질문올립니다!

이 게시물을...
첨부
엮인글 :
http://www.abyul.com/zbxe/123559/c1b/trackback
목록

댓글 '2'

profile

[레벨:30]아별

2013.09.03 22:11:37
*.104.126.21

열심회원님..
안녕하세요?

이번 질문으로 아래 3가지에 대한 기본 지식을 배우시게 됩니다.
     1. 유저폼의 텍스트박스에 입력되는 값은 기본적으로 문자열로 인식합니다.
     2. VAL()함수를 사용하면 문자열로 저장된 숫자를 숫자 값으로 변환해줍니다.
     3. VAL()함수는 문자열로 저장된 숫자는 숫자로 변환하지만 문자열일 경우 0을 리턴합니다.

입력된 값이 "0"이라면 0은 숫자니까.. 그냥 문자를 입력하라는 메시지를 띄우고..
VAL(입력값)이 0일 경우는 문자열이니까.. 숫자를 입력하라는 메시지를 띄웁니다.
그외의 경우는 숫자를 입력한 경우니까.. 문자를 입력하라는 메시지를 띄웁니다.

끝~

Private Sub TextBox1_AfterUpdate()
    Dim sInput As String
    sInput = Me.TextBox1.Value
    
    If sInput = "0" Then
        MsgBox "문자를 입력해주세요!"                   
    ElseIf Val(sInput) = 0 Then
        MsgBox "숫자를 입력해주세요!"
    Else
        MsgBox "문자를 입력해주세요!"
    End If

End Sub 



다운받기 : 숫자문자검색_1.xlsm

도움이 되셨기를.. ^^
첨부

[레벨:4]열심회원

2013.09.04 09:54:41
*.218.33.33

아 그렇군요 .ㅠㅠ 전 아스키코드를 찾아봐서 아스키코드를 이용햇는데 더욱 간단한 방법이 잇엇군요!!


항상 감사합니다. 잘쓰겟습니다!!

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수sort
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 56793
702 엑셀일반 엑셀 링크에서의 문제입니다. [3] [레벨:0]주주아빠 2013-06-07 2712
701 VBA 사용자 정의 폼 관련 file [2] [레벨:4]고수가되고파 2012-10-16 2716
700 VLookup 표에서 해당 값 찾기 질문입니다. file [2] [레벨:3]rynoel 2012-06-26 2716
699 아별님, 데이터 통합방법을 모르겠습니다~ [2] [레벨:1]노브레인 2010-11-10 2717
698 VLookup 참조범위의 셀에 '~' 글자가 들어가도 조회하는 방법 file [2] [레벨:4]성투은자 2013-12-03 2758
697 IF수식 조건 함수문의 file [2] [레벨:3]블루짱이 2012-01-17 2769
696 엑셀일반 궁금합니다. 아별님+_+ [5] [레벨:3]빛의행운아 2012-02-24 2771
695 엑셀일반 상대참조 질문이요~ [1] [레벨:4]요셉 2013-08-08 2773
694 엑셀일반 질문드려용// [3] [레벨:4]thoi 2013-04-02 2778
693 기타 만족도 조사 file [2] [레벨:3]빛의행운아 2012-07-09 2784
692 엑셀일반 안녕하세요 질문좀 하려고 합니다 [2] [레벨:1]달빛아래말할게 2014-07-19 2785
691 이미지,도형 등 안녕하세요! 처음으로 드리는 질문입니다! imagefile [1] [레벨:1]히어로 2013-11-16 2789
690 엑셀수식 다중 조건을 만족하는 값을 입력하고 싶습니다. file [2] [레벨:1]엑셀배우기 + 1 2014-02-10 2799
689 아별툴관련질문 Crtl+Shift+1 [2] [레벨:1]시준우 2013-06-03 2803
688 VBA 데이터 수집 질문_01 입니다. file [2] [레벨:1]아우릭 2012-03-20 2808
687 인사관리 file [2] [레벨:5]눈물바다 2011-04-14 2818
686 도와주세요 엑셀님들ㅠㅠ [1] [레벨:1]언용구 2013-04-03 2832
685 행열 바꿈 질문좀 드릴께요~ file [1] [레벨:2]yang1019 2010-11-03 2841
684 업데이트 이후 엑셀파일간 이동이 안되네요 [1] 매니아 2013-01-14 2843
683 질문있습니다. file [5] [레벨:5]정화 2011-05-25 2862
목록
쓰기