Thema Datum  Von Nutzer Rating
Antwort
18.07.2024 00:39:27 Roman
NotSolved
Blau Ausblenden / Einblenden von Zeilen anhand Checkboxen
 18.07.2024 11:43:38 Gast44435
NotSolved
18.07.2024 11:59:47 Gast7215
NotSolved

Ansicht des Beitrags:
Von:
Gast44435		 Datum:
18.07.2024 11:43:38		 Views:
79		 Rating:
     
Antwort:
  Ja
Thema:
Ausblenden / Einblenden von Zeilen anhand Checkboxen

Hallo,

nutzt du ActiveX-Checkboxen oder Formularsteuerelemente-Checkboxen.

Für Formularsteuerelemente-Checkboxen kann man via Application.Caller auf ein Event reagieren.

Das wäre beispielhaft so (in ein allgemeines Modul):

Option Explicit

Sub Kontrollkaestchen_Klicken() ' reagiert auf Event einer Checkbox
    With ActiveSheet.Shapes(Application.Caller).TopLeftCell
        MsgBox ActiveSheet.Shapes(Application.Caller).Name
    End With
End Sub

Sub AllenFormularCheckboxenMakroZuweisen()  ' alle Shapes (Checkboxen) einlesen
    Dim objCheckbox As Shape
    For Each objCheckbox In ActiveSheet.Shapes
        objCheckbox.OnAction = "Kontrollkaestchen_Klicken"
    Next objCheckbox
End Sub

Für ActiveX Checkboxen wäre dies via Klasse machbar. Dazu müsstest du eine der Sache entsprechende Beispieldatei hochladen.

Es ginge, wenn die Zahl der Checkboxen sich nicht ändert auch mit einer kleinen Funktion, welche in der _Click Prozedur ausgelöst wird.

Gruß Uwe

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
18.07.2024 00:39:27 Roman
NotSolved
Blau Ausblenden / Einblenden von Zeilen anhand Checkboxen
 18.07.2024 11:43:38 Gast44435
NotSolved
18.07.2024 11:59:47 Gast7215
NotSolved