Kontrollkästchen im Formularsteuerelement mit Makro löschen

[H.Fischer]

Hallo zusammen,

ich habe ein Kontrollkästchen (Formularsteuerelement). Ich suche nun das Makro um das Häkchen in dem Kontrollkästchen mittels einer Schaltfläche (Formularsteuerelement) zu löschen.

Beste Grüße

Harrtmut

[Crazy Tom]

moin

was spricht denn dagegen, anstatt auf den Button gleich den Haken per Klick zu entfernen?

ansonsten vielleicht so

Sheets("Tabelle1").Shapes("Check Box 1").OLEFormat.Object.Value = 0

mfg Tom

[H.Fischer]

Hallo Tom,

ich habe 24 solcher Kontrollkästchen, daher das Löschen mittels der Schaltfläche. Dein Vorschlag bezieht sich aber auf ein Active X-Steuerelement daher auch der VBA-Code. Ich habe aber Formularsteuerelemente und möchte das über Makros lösen.

Gruß

Hartmut

[Klaus-Dieter]

gelöscht

[Crazy Tom]

hast du meinen Vorschlag überhaupt probiert oder hat dich der Name Check Box 1 abgeschreckt?

[H.Fischer]

Hallo Klaus-Dieter,

Mit der Schaltfläche (Formularsteuerelement) habe ich schon ca. 50-60 Makros mit denen ich den Inhalt von Zellen lösche. Ich würde ungerne eine weitere Schaltfläche (Active X Steuerelement) einbauen um die Check Boxen zu löschen.

Gruß

Hartmut

---

Hallo Tom,
leider nein, ich muss aber auch zugeben das ich nicht weiß wo ich den Code eingeben muss   

Gruß

Hartmut

[Crazy Tom]

soll ich meinen Vorschlag auch löschen oder reagierst du da noch mal drauf?

---

wo hast du denn sonst deine Makros?
das Makro gehört in ein normales Modul
deiner Formularschaltfläche weist du dann per Rechtsklick dieses Makro zu

Code:

Sub test()
    Dim i As Integer
    For i = 1 To 24
        Sheets("Tabelle1").Shapes("Check Box " & i).OLEFormat.Object.Value = 0
    Next
End Sub

damit werden dann bei allen 24 Formular Kontrollkästchen die haken entfernt
vorausgesetzt du hast die Kontrollkästchen nicht umbenannt

[Klaus-Dieter]

Hallo Hartmut,

Mit der Schaltfläche (Formularsteuerelement) habe ich schon ca. 50-60 Makros mit denen ich den Inhalt von Zellen lösche. Ich würde ungerne eine weitere Schaltfläche (Active X Steuerelement) einbauen um die Check Boxen zu löschen.

das deutet für mich darauf hin, dass in deinem Projekt einiges etwas unstrukturiert ist. Mit Makros arbeite ich, seit es VBA im Excel gibt. Habe noch nie so viele Makros benötigt. Es gibt auch Möglichkeiten, Makros ohne Schaltflächen zu starten.

[H.Fischer]

Hallo Tom,

ich versuche das jetzt mal umzusetzen und melde mich ggf. noch einmal wenn es nicht klappt.

Gruß

Hartmut

---

Hallo Klaus-Dieter,

das kann schon sein das es bessere Möglichkeiten gibt, leider weiß ich es nicht besser.

Gruß

Hartmut

[Klaus-Dieter]

Hallo,

dann zeige doch mal eine Beispieldatei, dann kann man bestimmt helfen.