특정 워크 시트가 사용 된 횟수를 추적하는 방법이 필요할 수 있습니다. 이를 수행 할 수있는 방법에는 여러 가지가 있습니다. 한 가지 간단한 방법은 워크 시트 자체에 개수를 저장하는 것입니다.

워크 시트 탭을 마우스 오른쪽 단추로 클릭 한 다음 상황에 맞는 메뉴에서 코드보기를 선택합니다. Excel에 다음 코드를 붙여 넣어야하는 Visual Basic Editor가 표시됩니다.

Private Sub Worksheet_Activate()

Range("A1").Select 'customize Range     ActiveCell = ActiveCell + 1     Range("B1") = "times opened" 'customize Range End Sub

이 코드는 워크 시트가 활성화 될 때마다 A1 셀의 값을 증가시킵니다. 필요에 따라 매크로가 정보를 기록하는 셀 위치를 수정할 수 있습니다.

보다 철저한 접근 방식은 통합 문서 내에서 명명 된 참조를 증가시키는 매크로를 만드는 것입니다. 다음 매크로를 고려하십시오.

Function IncrementEventCounter(sName As String, sht As Object)

On Error Resume Next     If sht.Names(sName) Is Nothing Then _       ThisWorkbook.Names.Add "'" & sht.Name & "'!" & sName, "1", False     On Error GoTo 0     With ThisWorkbook.Names("'" & sht.Name & "'!" & sName)

.RefersTo = Val(Mid(.Value, 2)) + 1     End With End Function

이 함수는 사용량 카운터를 증가시키는 이벤트에 의해 트리거되는 다른 매크로에서 호출되도록 설계되었습니다.

예를 들어 워크 시트가 활성화 될 때마다 추적하려면 ThisWorkbook 개체의 일부로 다음 매크로를 사용합니다.

Private Sub Workbook_SheetActivate(ByVal sh As Object)

IncrementEventCounter "Activated", sh End Sub

매크로는 워크 시트에 대해 “활성화 됨”이라는 카운터를 증가시킵니다. 카운터 이름과 워크 시트 이름과 함께 IncrementEventCounter 매크로를 호출하여이를 수행합니다. 대신 워크 시트가 변경된 횟수를 계산하려면 ThisWorkbook 개체의 일부로 다음 매크로를 사용할 수 있습니다.

Private Sub Workbook_SheetChange(ByVal sh As Object, _   ByVal Target As Excel.Range)

IncrementEventCounter "Changed", sh End Sub

이 매크로와 이전 매크로의 유일한 차이점은 “변경됨”이라는 카운터를 증가 시킨다는 것입니다. 카운터 값을 보려면 카운터를 참조하는 셀에 수식을 입력하면됩니다. 예를 들어 = Changed를 입력하여 Changed 카운터의 값을 보거나 = Activated를 입력하여 Activated 카운터의 값을 볼 수 있습니다. 카운터는 시트 단위로 유지되므로 각 카운터의 값은 시트마다 다릅니다.

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (10544)은 Office 365의 Microsoft Excel 2007, 2010, 2013, 2016, 2019 및 Excel에 적용됩니다. 여기에서 Excel의 이전 메뉴 인터페이스에 대한이 팁 버전을 찾을 수 있습니다.

link : / excel-Counting_the_Times_a_Worksheet_is_Used [워크 시트 사용 횟수 계산].