[땡큐엑셀vba & 엑셀매크로] 셀의 변경에 따른 카운트 증가

초기화

 

 

sheet2!a1셀에 값입력

 

 

Sheet1!b1셀에 카운트 증가

 

 

 

 

'http://kin.naver.com/qna/detail.nhn?d1id=1&dirId=102020101&docId=284157540

'sheet1에 a1 이라는 셀에는
'sheet2의 a1 값이 참조되어 있습니다
'sheet2에 a1 값이 오면 sheet1의 a1에 같은 값이 뜨면서 sheet1의 b1에는 숫자 1이 카운트 되고
'그 후 sheet2의 a1에 값이 지워지면 sheet1의 a1에도 값이 지워지겠지만 b1에는 1이 입력되어 있다가
'sheet2의 a1에 새롭게 숫자가 입력되면 sheet1의 b1에는 숫자2로 카운트 되는
'카운트가 누적되는 함수를 만들려면 어떻게 해야 할까요


'
' Source by 땡큐엑셀vba & 엑셀매크로
'
' calculate이벤트는 워크 시트를 다시 계산 한 후에 발생합니다.이때 특정된 셀을 분석하면 됩니다.
Private Sub Worksheet_Calculate()

    'A1셀이 0,널이 아닌경우 B1셀에 1씩 증가
    If Range("A1") = 0 Or Range("A1") = "" Then
    
    Else
        Range("B1") = Range("B1") + 1
    End If
    
End Sub

 

 

카운트증가-Worksheet_Calculate-땡큐엑셀vba.xlsm

0.14MB

 

땡큐엑셀vba