Оценка ToggleButton на определенном листе

Question

Как я могу оценить статус кнопки переключения на конкретном листе?

Если мой код хранится с определенным рабочим листом, я могу только сослаться на имя кнопки:

Private Sub ToggleButton1_Click() 
If ToggleButton1.Value = True Then 
    Debug.Print "true" 
Else 
    Debug.Print "false" 
End If 
End Sub 

Однако, если мой код хранятся в модуле выше метод не работает. Я попытался следующие, но это также не работает:

Public Sub Check_Button() 
If Sheets("sheet1").OLEObjects("ToggleButton1").Value = True Then 
    Debug.Print "true" 
Else 
    Debug.Print "false" 
End If 
End Sub 

Answer 1

Просто:

Public Sub Check_Button() 
If Sheets("sheet1").ToggleButton1.Value = True Then 
    Debug.Print "true" 
Else 
    Debug.Print "false" 
End If 
End Sub 

И хотя это, вероятно, не является хорошей практикой, стоит упомянуть что вы можете потерять ".Value" как таковой:

If Sheets("sheet1").ToggleButton1 = True Then