Office: Drehfeld Eigenschaften

Hallo erstmal...
also immer wenn ich ein drehfeld oder eine Bildlaufleiste in EXCEL erstelle, damit eine Zelle sich verändert, funktionieren die zahlen über Null einwandtfrei... aber wenn ich negative Zahlen haben will springt er mir immer auf die Zahl 65535!!!! ich weiß jetzt nur, das man es in den eigenschaften ändern muss.... aber wie??? bitte helft mir!!

:)

 

Moin, a-GI,

wenn Du eine Zelle fest für die Ausgabe per LinkedCell vorgegeben hast, passiert dieses geschilderte Verhalten von Excel.

Um negative Werte darzustellen, wechselst Du in den VBA-Editor und gibst auf dem entsprechenden Arbeitsblatt (nicht DieseArbeitsmappe, nicht Modul) folgenden Code ein, wobei die Ausgabezelle angepasst werden muß sowie der Name des Spinbuttons:

Code:

Unter den Eigenschaften legst Du dann den Maximalwert z.B. auf -10 fest, das Min auf 0...

Moderatorenanmerkung: die Überarbeitung dieses Beitrages ist im Zuge der Arbeiten zu sehen, die durch den Wechsel der Forensoftware zum 01.01.2003 verursacht wurden.

Es wurden in diesem Beitrag Links korrigiert, die auf falsche Adressen zeigten...

 

Hallo a-GI, hallo Jinx,

bei Deiner Lösung passiert folgendes: Bei einem Klick auf SpinUp wird von 0 nach -10 heruntergezählt(!) und dann gestoppt (Dein Max-Value). Bei Klick auf SpinDown wird wieder hochgezählt. Der Zähler endet bei 0 (Deinem Min-Value). Jetzt gibt es also keine positiven Zahlen mehr und die Wirkung des Spinbuttons ist eher überraschend.

Ich möchte eine andere Lösung vorschlagen, um sowohl positive als auch negative Werte darstellen zu können, ohne Gefahr zu laufen, an das Ende des Wertebereichs des SpinButtons zu stoßen.

SpinButton anlegen und in den Eigenschaften SmallChange auf 0 setzen. Keine Anbindung einer LinkedCell, sondern Auswertung der Ereignisse SpinButton_SpinUp bzw. SpinButton_SpinDown wie folgt:

Private Sub SpinButton1_SpinDown()
Range("a1") = Range("a1") - 1 'oder anderes Inkrement
End Sub

Private Sub SpinButton1_SpinUp()
Range("a1") = Range("a1") + 1 'oder anderes Dekrement
End Sub

Die Zielzelle und das Inkrement/Dekrement müssen natürlich gegebenenfalls angepasst werden.

Schönen Abend noch

Johannes