vba - どのチェックボックスがチェックされたかを知る

Question

Excel シートに非常に多くのチェックボックスがあります。それぞれのチェック イベントで Common Sub を呼び出しています。

共通サブでどのチェックボックスがチェックされていたかを知ることはできますか? （対応するアクションを取ることができるように）

Answer 1

これを試して

Sub CommonClick
    Dim cb As CheckBox

    On Error Resume Next
    Set cb = ActiveSheet.Checkboxes(Application.Caller)
    If Err.Number <> 0 Then
        MsgBox "Sub not called from a CheckBox on current sheet"
        Exit Sub
    End If
    On Error GoTo 0

    MsgBox cb.Name & " was set to " & cb.Value
End Sub