Ich habe in meiner Tabelle eine Schaltfläche, die ein Macro ausführt. Nun habe ich zusätzlich ein Umschaltbutton (Hand/Auto) mit eingefügt, welches folgende Aufgabe haben sollte:
Bei Stellung HAND nicht ausführen, d.h. ich kann mit meiner normalen Schaltfläche per Klick mein Macro ausführen.
Bei Stellung AUTO soll er ,bei Eingabe in bestimmen Zellen, das Macro der normalen Schaltfläche ausführen. Folgendes steht bei mir, funktioniert aber nicht.
Private Sub ToggleButton1_Click()
With ToggleButton1
Select Case .Value
Case False: .Caption = "Auto"
Case True: .Caption = "Hand"
End Select
End With
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Application.Intersect(Target, Range("I13:I21"), Range("M13:M21")) Is Nothing Then Exit Sub
If ToggleButton2.Value = False Then
Call sortierengesamt
End If
End Sub
Im Anhang die Datei: DANKE für Antworten
https://www.herber.de/bbs/user/17475.zip