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

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

안녕하세요 아별님~

오랫만에 찾아왔습니다.

 

요즘 VBA에 관심이 많아 이것저것 하던중.. (정식으로 공부를 시작하진 않았습니다..ㅠㅠ)

아래와 같은 난관에 봉착하여 아별님의 큰 은총을 받고자 질문을 드립니다.

 

일단, 해당 시트의 특정 Range 의 값이 변경될 경우(직접변경), 매크로가 자동실행되도록 짜보았습니다.

하지만, 해당 값이 다른시트의 값을 참조하는 경우 변경으로 보지 않아 매크로가 실행되지 않더라구요..

 

질문 1. 다른시트의 값을 참조하여 값이 변경된 경우에도 매크로가 자동실행되도록 가능한지..

 

질문 2. 안된다면... 특정 셀의 값이 0이 아닐경우, 자동으로 매크로가 실행되도록 가능한지..

 

 

위의 두가지입니다.

 

부탁드리겠습니다! ^^

 

 

http://www.evernote.com/l/ACdkhz0XAkZIQIs9DoproV92cvayVqHPtnc/

 

 

회사내 보안으로 첨부파일은 Evernote 링크로 대체하였습니다.

 

안보일...까요?; ㅠㅠ


댓글 '2'

profile

[레벨:30]아별

2014.10.24 16:42:30
*.132.210.135

jmsynn님 반갑습니다. ^^


아래처럼 Worksheet_Change대신에 Worksheet_Calculate를 사용하시고..


Private Sub Worksheet_Calculate()

    If Intersect(Target, Range("d5:e28")) Is Nothing Then Exit Sub

        Call 목표값찾기

End Sub


모듈에서는 목표값찾기를 아래처럼 특정 시트에서 동작하도록 수정해보세요..


Sub 목표값찾기()

    Dim sht As Worksheet

    Set sht = Sheets("참고")

    sht.Range("D34").GoalSeek Goal:=0, ChangingCell:=Range("D4")

    sht.Range("E58").GoalSeek Goal:=0, ChangingCell:=Range("e4")

End Sub


도움이 되셨기를..


[레벨:3]jmsynn

2014.10.27 16:17:00
*.163.60.21

아별님 답변 감사드려요..

말씀하신 것 처럼 수정해서 실행해보니 컴파일 오류가 뜨더라구요

내용 : 424 런타임 오류가 발생하였습니다. 개체가 필요합니다.

대상 : If Intersect(Target, Range("d5:e28")) Is Nothing Then



이부분 이예요.. 무슨 문제 일까욧?

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 14874
780 기타 아별탭 받는법 [2] [레벨:1]뽕밭의향기 2014-11-24 1040
779 엑셀수식 품목별 자재사용내역서에서 조회 원하는 날 이전 근접값 조회하기 file [레벨:4]성투은자 2014-11-19 1525
778 엑셀수식 index 수식을 사용한 열들에서 행별 counta 사용하기 secret [2] [레벨:4]성투은자 2014-11-17 4
777 엑셀수식 다중 셀 Count 함수에 대하여 질문 드립니다. [2] [레벨:5]눈물바다 2014-11-14 909
776 SUMIF 엑셀 문의드립니다. (엑셀2013) secret [레벨:1]pongpong 2014-11-10 4
775 VLookup VLOOKUP으로 하이퍼링크 주소 가져오기 [1] [레벨:1]으앙 2014-11-06 1974
774 피벗테이블 피벗테이블을 이용한 판매일보 관리 secret [레벨:1]삽질대마왕 2014-11-04 2
773 엑셀수식 엑셀 함수관련해서 질문드려요 file [레벨:4]요셉 2014-11-04 1335
772 VBA 논리식 일거라 예상은 하는데.... 도저히 모르겠어서 여쭤봅니다^^ file [레벨:1]mr_han123 2014-10-28 1010
» VBA 특정값이 변경될 경우 매크로실행 또는 0이 아닐경우 실행 [2] [레벨:3]jmsynn 2014-10-24 2346
770 VLookup Vlookup으로 하이퍼링크를 땡겨오고 싶습니다. file [2] [레벨:1]wooljima0 2014-10-23 1159
769 엑셀수식 안녕하세요 질문 좀 드리겠습니다 file [2] [레벨:1]달빛아래말할게 2014-10-20 1785
768 엑셀수식 엑셀시트제목 .. 함수 관련 [1] [레벨:1]박주연 2014-10-16 1142
767 엑셀일반 엑셀함수중 일수구하기 질문입니다. [2] [레벨:5]정화 2014-10-14 915
766 엑셀수식 countif 함수 질문 file [2] [레벨:5]눈물바다 2014-10-05 997
765 엑셀수식 indirect 함수 질문 file [1] [레벨:5]눈물바다 2014-09-27 1060
764 엑셀일반 하이퍼 링크 추가 질문 file [1] [레벨:5]눈물바다 2014-09-27 1212
763 엑셀일반 하이퍼 링크 [1] [레벨:5]눈물바다 2014-09-26 981
762 엑셀일반 다중셀 중복 항목 찾기 (시간표 같은 표에서) file [2] [레벨:4]thoi 2014-09-15 1615
761 엑셀일반 엑셀 질문이 있습니다. file [레벨:1]최영석 2014-09-01 919