Мне нужна помощь, чтобы изменить состояние флажка, когда я меняю лист с каждым другим состоянием в EXCEL VBA

Question

Я занимаюсь разработкой некоторого макроса VBA с флажком ленты.Как я могу изменить состояние флажка, когда я меняю лист с каждым другим состоянием в EXCEL VBA.Я использую функцию обратного вызова "Workbook_sheetAcivate" в модуле книги.Но я не могу контролировать состояние флажка в этом модуле.

Вот код флажка:

Sub checkBox1_getPressed(control As IRibbonControl, ByRef returnedVal)
    rv = Cells(7, 13)
    MsgBox "체크박스1 , rv : " & rv 
    If rv = 1 Then 
        returnedVal = True
      Else
        returnedVal = False
    End If
   'oxIRibbonUI.Invalidate
End Sub