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

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

vba 에러처리

VBA 조회 수 2215 추천 수 0 2012.09.23 18:18:33

운영체제 : win7

엑셀 : 2010 sp1

 

첨부된 예제에서 매크로를 실행하면 나오는 대화상자에서 InputBox메서드가 Type:=8 이므로

범위만 입력할 수 있습니다.

 

질문1)

문자, 숫자를 입력하면 MsgBox함수로 에러처리를 하려면 어떻게 하여야 하는지요?

 

질문2)

첨부된 파일의 코드에는 on error를 이용하여 "취소" 선택시 MsgBox함수로 에러처리를 하였는데요.

Type:=8을 변경하지 않은 상태에서 on error를 이용하지 않고 "취소" 선택시 MsgBox함수로 에러처리를 하고,

문자, 숫자 입력 시 MsgBox함수로 에러처리를 하는 방법도 있는지요?

 

질문3)

범위 입력시 F3 셀만 선택하고 "확인"을 누르면 나오는 msgbox함수에서 "확인"을 누르면 또다시 msgbox함수가 나오는데요.

원인이 무엇인지요?


댓글 '2'

profile

[레벨:30]아별

2012.09.25 22:54:12
*.104.126.21

안녕하세요? 고수가되고파님..

닉네임에서 절실함이 느껴집니다. ^^

열심히 공부하시는걸 보니.. 금방 고수가 되실 수 있을 것 같습니다.

 

답변1)

해보시면 아시겠지만.. type을 8로 지정하셨기 때문에 범위가 아닌 값을 입력하고 확인을 입력하면..

inputbox자체에서 에러 문구를 띄웁니다. 따로 코딩하실 필요가 없습니다.

 

답변2)

지금 하신 코딩이 취소 버튼을 클릭했을때의 올바른 처리입니다.

If rngSelection Is Nothing Then 에러메시지..

On Error Error Resume Next 와 On Error GoTo 0는 불필요한 코딩인 것 같습니다. 해당 행들은 삭제해주세요..

 

답변3)

일단 로직 자체가 잘 못 되었습니다.

 

상수 중에 숫자로 된 셀들 안에서 수식이 있는 셀을 검사하는 것 자체가 오류입니다.

수식이 아닌 상수만 있는 셀만을 대상으로 해서 수식이 있는 셀인지 검사한다는것인데요.. 항상 해당하는 것이 없을 수 밖에 없습니다.

     For Each rngC In rngSelection.SpecialCells(xlCellTypeConstants, xlNumbers)
        If rngC.HasFormula Then
            rngC.Interior.Color = vbGreen
        Else
            MsgBox "해당되는 셀이 없습니다.", vbOKOnly + vbInformation, strTitle
        End If
    Next rngC

 

 첨부파일을 참고하세요..

다운받기 : 예제(에러처리) (1).xlsm

 

 

 

첨부

[레벨:4]고수가되고파

2012.09.26 09:00:04
*.104.208.234

답변1)에서요. inputbox자체에서 에러 문구를 띄우는거 말고 MsbBox로 표현하려고 하거든요.. 공부차원에서요...ㅠ,;;

답변2)도 같은 맥락이구요.

질문3)은 코드가 잘못된 것 같습니다. 질문 다시하겠습니다^^;;.

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 40254
502 날짜/시간 수식 답변 너무 감사하구요 재문의 드립니다. file [5] [레벨:0]아민 2012-09-27 1793
501 VBA 개체와 컬렉션 [2] [레벨:4]고수가되고파 2012-09-26 2056
500 VBA 빠른실행도구모음 외 image [2] [레벨:4]고수가되고파 2012-09-26 2011
499 VBA VBA에러처리2 file [5] [레벨:4]고수가되고파 2012-09-26 2743
» VBA vba 에러처리 file [2] [레벨:4]고수가되고파 2012-09-23 2215
497 날짜/시간 수식 수식연동 좀 해 주셔요 file [6] [레벨:0]아민 2012-09-22 1482
496 VLookup 다른시트에 있는 연락처 옮겨오기 file [2] [레벨:1]뚱뚱만만 2012-09-20 1924
495 VBA 엑셀파일 검색후 불러오기 문의 file [3] [레벨:2]광택입니다 2012-09-19 2833
494 셀서식(표시형식) 아별님 다시 질문드려요, file [2] [레벨:2]북곰 2012-09-18 1800
493 엑셀일반 콤보박스의 값 하나를 선택하면 또 다른 목록이 보이는 콤보박스 만들기 등 file [2] [레벨:4]성투은자 2012-09-18 5556
492 엑셀일반 안녕하세요^^야별님.. file [2] [레벨:2]북곰 2012-09-16 1448
491 VBA vba속도 관련 외 file [2] [레벨:4]고수가되고파 2012-09-12 2005
490 VBA 파일&폴더 참조하고 있는 파일 열기 [1] [레벨:4]고수가되고파 2012-09-11 2467
489 차트 안녕하세요 아별님 file [2] [레벨:2]쿠라 2012-09-09 1865
488 엑셀일반 질문드립니다. file [2] [레벨:3]빛의행운아 2012-09-07 1570
487 아별툴관련질문 작은 창이 생겨서 사라지지 않습니다. imagefile [4] [레벨:3]이경남 2012-09-06 1575
486 엑셀일반 폼에 그림넣는법점알려주세여 [2] [레벨:2]snail0513 2012-09-05 1598
485 기타 요청한 항목을 찾을 수 없습니다. (hhttp/1.0 404) _ 외부 연결 끊기, 업데이트하지 않도록 옵션 설정하기 imagefile [6] [레벨:3]월전천넘 2012-09-05 3404
484 엑셀수식 분포도 그래프 [1] [레벨:5]눈물바다 2012-09-05 3072
483 SUMIF SUMIFS 관련 질문입니다!! [4] [레벨:3]jmsynn 2012-09-03 2410