Überprüfen, ob ein auf Arbeitsblättern basierendes Kontrollkästchen aktiviert ist

Ich versuche mit einer IF-Klausel festzustellen, ob mein Kontrollkästchen mit dem Namen "Kontrollkästchen 1" für die weitere Verwendung in meinem Programm aktiviert ist oder nicht.

Mein aktueller Code:

Sub Button167_Click()
 If ActiveSheet.Shapes("Check Box 1") = True Then
 Range("Y12").Value = 1
 Else
 Range("Y12").Value = 0
 End If
End Sub

Das scheint nicht zu funktionieren, aber das Debug sagt mir, dass es ein Problem mit dem gibt

      ActiveSheet.Shapes("Check Box 1")

Ich weiß jedoch, dass dieser Code funktioniert (obwohl er einem anderen Zweck dient):

ActiveSheet.Shapes("Check Box 1").Select
With Selection
.Value = xlOn

BEARBEITEN: Wenn weitere Informationen erforderlich sind, befinden sich meine Kontrollkästchen (auf meiner Seite befinden sich 200) in Blatt 1 mit dem Namen "Demande". Und jedes Kontrollkästchen hat den gleichen formatierten Namen wie "Kontrollkästchen ...".

Alle Hilfe wäre dankbar. Vielen Dank

Antworten auf die Frage(4)

Ihre Antwort auf die Frage