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

 잡초 (yoojaehyun)

추천:  2
파일:     같은셀에숫자더하기.xlsm (17.9KB) 조회:  1266
제목:   [RE]한?셀에서?숫자?입력시?계속?더해지게?가능합니다.
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

 - 엑셀 버전(95,97,2000,xp,2003,2007):

* 아래줄에 질문을 작성하세요 >>

한 셀에 숫자를 바꿔서 입력할 때 그 숫자들이 더해져서 나오게 가능할까요?
예를 들어 A1 셀에 1을 입력하고 그 다음에 A1셀에 3을 입력하면
1+3이 더해져서 4가 나오게 가능한지...
함수는 범위 영역을 정해야 해서 어떻게 해야할지 잘 모르겠어요;;;
가능하다면 방법이 있을까요?
==============[yellow님 글에 대한 답변입니다]==============
에러발생하면 직접실행 창에 Application.EnableEvents = True
실행하세요.

Dim PlusValue As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells.Count > 1 Or Not IsNumeric(Target) Or Target.Address <> "$A$1" Then
        Application.EnableEvents = True
        Exit Sub
    Else
        Application.EnableEvents = False
        Target = Target + PlusValue
        Application.EnableEvents = True
    End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If IsNumeric(Target) Then
        PlusValue = Target.Value
    End If
End Sub
 
[불량 게시물 신고]  
        
  

작성일 : 2021-12-25(14:09)
최종수정일 : 2021-12-25(14:09)
 


 ◎ 관련글

  제 목   작성자   날짜
한 셀에서 숫자 입력시 계속 더해지게 가능할까요? yellow 2021-12-25
[RE]한?셀에서?숫자?입력시?계속?더해지게?가능합니다. 잡초 2021-12-25