나눔터  
  HOME > 나눔터 > 묻고답하기 > 엑셀
엑셀
엑셀에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내

작성자:  

 최영민 (river2u)

추천:  2
파일:     사본 - 투찰가산정 (2).xls (99KB) 조회:  2194
제목:   황기성님이 갈켜준change 이벤트를 작성했는데 도와주세요
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

1. 엑셀 버전(95,97,2000,2002):
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP):
3. CPU (486,PentiumI/II/III/IV...):
4. RAM (32,64,128,256,512MB,1G...): 

* 아래줄에 질문을 작성하세요 >>
CHANGE 이벤트를 이용해 셀값이 바뀔때 매크로가 자동으로 실행되도록 바꿨는데 무한순환을 합니다.
어떻케 해야되는지 부탁드립니다.
참고로'블랙홀(2)'에서 버튼을 눌러 작동되는 것이 '블랙홀'에서는 셀값이 변하면 자동으로 실행되도록 하고 싶어 만들었습니다.
변화될 셀값은 C1,C2,C12,C13,C14,C15,H13 입니다. 이것들의 변화만 체크하면 되는데 어떻게하는지를 몰라서 어떤셀이라도 변화되면 작동되는데 이것도 같이 수정해 주세요
고맙습니다.
 
[불량 게시물 신고]  
작은오리아래처럼 추가해 주시면 될듯하군요

Private Sub Worksheet_Change(ByVal Target As Range)
' user이(가) 2003-05-15에 기록한 매크로
' 바로 가기 키: Ctrl+z
'팝업창이 떠서 셀을 선택할수있게합니다
'기초금액 = Application.InputBox("기초금액을 입력", "기초금액")
Select Case Target.Address
    Case "$C$1"
    Case "$C$2"
    Case "$C$12"
    Case "$C$13"
    Case "$C$14"
    Case "$C$15"
    Case "$H$13"
    Case Else
        Exit Sub
End Select
.
.
.
.
.
그럼..
09-03 (12:45)
삭제 ■신고
최영민우와!!! 됩니다. 정말감사해요
무한순환도 같이 해결됐네요. 대상(target)이 없어서 그랬던건가요??
09-03 (13:01)
삭제 ■신고
황기성Select Case Target.Address
    Case "$C$1","$C$2","$C$12","$C$13","$C$14","$C$15"

라고 하셔도^^*

그럼...행운이 있으시길...!
09-03 (14:40)
삭제 ■신고
작은오리히히히~  감사....(_._)
09-03 (16:30)
삭제 ■신고
        
  

작성일 : 2003-09-03(11:59)
최종수정일 : 2003-09-03(11:59)