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

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

VBA 실행시 경고 메세지 출력하기

VBA 조회 수 3031 추천 수 0 2013.06.21 11:25:49

안녕하세요!

아별님!!

VBA를 공부 하고,업무에 활용하고자 합니다

 

하기 VBA에서  VBA_1 이 두번 연속으로 실행 안되게 합니다
여기서 두번 연속 실행시  하기의 경고 메세지를 출력되게 하고 싶습니다(같은자리에 입력으로 데이터 겹쳐짐 방지)
'MsgBox "두번연속 입력입니다,입력 데이터를 확인 하세요☞ !", vbExclamation, " Programing By jhkim"
어느 부위에 추가를 해야 하는지요??
 아래VBA는 2번연속  VBA_1 이 실행 되지는 않으나 경고 메세지 출력어 없어 알수가 없어 경고 메세지창을 출력 하고자 합니다


정상 실행 순서는 VBA_1  >>> VBA_2  >> 실행1,또는2 는 정상 실행
이렇게 실행시는 VBA_1  >>> VBA_1  >>  실행이 안되고 경고 메세지 출력되게 하려고 합니다

Dim bln As Boolean
 
Sub VBA_1()  '2번 연속으로 실행안되게 하는 메뉴
If bln Then Exit Sub
bln = True                                       '이곳 어디에 2번 연속 실행시 경고 메세지 출력을 추가 하고 싶어요
data입력국내1
End Sub
 
Sub VBA_2()
  If bln Then bln = False
  data입력해외3
End Sub
 
Sub VBA_ALL()
   If bln Then bln = False
  Main일일1
End Sub

Sub VBA_ALL2()
   If bln Then bln = False
  Main전체1
End Sub

Sub 실행1()
If MsgBox("정말로 명령을 실행할까요?,실행이후는 취소가 불가능 합니다", vbYesNo + vbDefaultButton2) = vbYes Then Call VBA_ALL          '실행여부를 묻는 명령 추가
End Sub

Sub 실행2()
If MsgBox("정말로 명령을 실행할까요?,실행이후는 취소가 불가능 합니다", vbYesNo + vbDefaultButton2) = vbYes Then Call VBA_ALL2             '실행여부를 묻는 명령 추가
End Sub


댓글 '2'

profile

[레벨:30]아별

2013.06.24 07:02:50
*.104.126.21

맑은이슬님..

8개의 질문 글중에 질문하실때 첨부파일을 주신게 2개밖에 없네요..

http://www.abyul.com/zbxe/?mid=xl_QnA&search_target=nick_name&search_keyword=%EB%A7%91%EC%9D%80%EC%9D%B4%EC%8A%AC


이번 질문부터, 엑셀 파일을 첨부해주시지 않으면 답변 드리지 않겠습니다.

엑셀 파일 올려달라고 공지 달고.. 댓글로 요청드린게 몇 년은 된 것 같습니다.

http://www.abyul.com/zbxe/98782


저는 최대한 배려해드렸다고 생각하는데요.. 제가 잘 못 생각하고 있는건가요?


맑은이슬님의 배려를 부탁드립니다.

감사합니다.

[레벨:5]맑은이슬

2013.06.24 07:31:12
*.247.145.54

먼저 감사 드립니다

죄송합니다,첨부 파일은 회사내 사용으로 외부 업로드 불가(보안 프로그램이 PC 자체에 내장)로 올릴수가 없습니다

아무리 간단한 파일도 외부로 업로드는 불가한 상황입니다

열심히 인터넷을 헤메어 공부 해야 겟습니다

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

아별툴관련질문 설치시 오류 질문드립니다. [4]

엑셀수식 일부영역을 참조로 원하는 곳의 값을 표시하는데 그 일부영역을 잘라내기 이동시 오류 file [2]

추가기능(AddIns) 비용 배부 후 집계 엑셀 프로그램을 만들고싶습니다. secret [1]

VBA VBA 실행시 경고 메세지 출력하기 [2]

엑셀일반 엑셀 2010 인쇄 질문 [3]

엑셀일반 예전에는 그림파일 삽입을 ctrl+v로 붙이지 않았나요? [1]

엑셀수식 연도명으로 만들어지는 시트에서 올해것만 자동참조하기 file [2]

엑셀일반 주소 텍스트 나누기 [3]

셀서식(표시형식) 엑셀 내용 전환 문의 file [8]

  • [레벨:1]neo
  • 2013-06-10
  • 조회 수 2772

엑셀일반 아별님! 감사합니다.다시질문드립니다 file [2]

  • [레벨:2]북곰
  • 2013-06-07
  • 조회 수 2382

엑셀일반 엑셀 링크에서의 문제입니다. [3]

엑셀일반 아별님! 안녕하세요 file [1]

  • [레벨:2]북곰
  • 2013-06-05
  • 조회 수 1983

엑셀일반 안녕하세요 아별님 file [2]

  • [레벨:2]북곰
  • 2013-06-04
  • 조회 수 2427

엑셀일반 3가지 이상의 조건을 만족하는 값을 구할려고 하는데요 함수가 막힙니다. imagefile [4]

  • [레벨:1]늘보
  • 2013-06-04
  • 조회 수 2837

아별툴관련질문 Crtl+Shift+1 [2]

VBA 닫혀있는 다른파일 데이터 어떻게 참조하나요? [1]

  • [레벨:1]coftw
  • 2013-06-01
  • 조회 수 2874

VBA VBA 서로 다른 파일에서 질문 입니다. [1]

차트 동적차트 질문드리겟습니다. file [5]

엑셀일반 글자수 세는 방법 질문입니다. imagefile [4]

엑셀일반 아별님 도와주세요 ㅜㅜ secret [3]