Spinbutton
26.08.2017 12:39:59
Welbers
In Zelle A1 steht ein Zähler, den ich mit einem Drehbutton hoch und runter zähle. Nun möchte ich, dass der Wert in Zelle a1 der Max-Wert bei einem zweiten spinbutton2 ist und der Wert auch in der Bezugszelle des Spinbutton2 angezeigt wird, wenn der Wert in A1 kleiner ist als der bisherige Wert in der Bezugszelle des Spinbutton2.
Die Zuweisung beim Aufruf der Tabelle funktioniert problemlos über open
Private Sub Workbook_Open()
Worksheets("Tabelle1").SpinButton2.Max = Worksheets("Tabelle1").Range("A1")
End Sub
aber die Änderung im Spinbutton2 funktioniert nicht, wenn ich den Wert in A1 mit dem Spinnbutton1 verändere.
Mein Versuch
Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$a$1" Then SpinButton2.Max = Target
End Sub
Aber da tut sich nichts.
Was mache ich falsch?
Kann mir jemand auf die Sprünge helfen.
Grüße
Peter