중소기업의 모든 업무자동화!

이럴 때 필요해요

한셀에 숫자를 누적한 값을 적고싶을때 사용합니다.

이렇게 사용해요

(1) 먼저, [프로젝트 탐색기] 창에서 해당 시트(여기서는 Sheet1)오브젝트를 

     더블클릭하여 [코드 창]을 띄웁니다.

(2) [코드 창] 상단에 있는 드롭다운 버튼을 사용하여 아래의 그림과 같이 

     'Worksheet_Change' 이벤트 프로시저를 호출합니다.

(3) 아래와 같이 코드를 작성합니다. C8 셀에 숫자를 입력하면 D8 셀에 값이 계속 누적되도록 가정한 것입니다.

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Address = "$C$8" Then

        [D8] = [D8] + Target

    End If

    Target.Select

End Sub

(4) 여기까지 되었으면 VB Editor창을 닫은 다음, C8 셀(Target)에 임의의 숫자를 입력하여 Test 해 보시기 바랍니다.

엄청 간단하죠?  그러나(!) 이런 식으로 하나의 셀에 값을 누적하는 작업 방법은 나중에 예기치 않은 후회를 하시게 되는 

경우가 발생할 수도 있으므로 이점 각별히 유의하시기 바랍니다.