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

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

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

글 수 113

숫자 문자 비교검색

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

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


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


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

이 게시물을...
첨부
엮인글 :
http://abyul.com/zbxe/123559/1f0/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
번호 제목 글쓴이 날짜 조회 수
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 42162
13 VBA ^^ 또다른 질문입니다. _ 한 시트에서 다른 시트로 데이터를 순차적으로 붙여넣기 file [1] [레벨:2]광택입니다 2011-11-15 3145
12 VBA SUMPRODUCT 질문 !! [1] [레벨:2]광택입니다 2011-11-01 3195
11 VBA 두번째 질문 file [1] [레벨:2]광택입니다 2011-10-21 2947
10 VBA 도와 주세요. file [1] [레벨:2]광택입니다 2011-10-21 3354
9 VBA 매크로.. [1] [레벨:2]광택입니다 2011-10-18 2994
8 VBA 한셀안의 서식을 다르게 지정할 수 있는 방법 없을까요? file [5] [레벨:4]부루끄 2011-09-28 6042
7 VBA 현재 선택 된 셀을 기준으로 같은방식의 연산결과 값을 산출하는 법 file [1] [레벨:4]부루끄 2011-07-26 4045
6 VBA VBA로 정렬하는 법 문의 file [6] [레벨:4]부루끄 2011-07-21 6059
5 VBA 수식이 입력된 셀은 자동으로 색상이 들어가게 하는 방법 [5] [레벨:4]부루끄 2011-07-15 4541
4 VBA 엑셀 열 추가 _ 엑셀의 마지막 셀 재 인식시키는 팁 ActiveSheet.UsedRange.Select imagefile [1] [레벨:5]눈물바다 2009-08-27 10024
3 VBA .Find 재고 입고월 분석(vba) file [3] [레벨:1]럽웨어 2009-07-24 7762
2 VBA .Find ListBox1 에 추가가 되지를 않습니다. file [3] [레벨:1]사오정원조 2009-07-03 6761
1 VBA .Find 매크로 질문입니다.~ [2] [레벨:1]카멜 2009-07-02 6750
목록
쓰기