Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.05.2024 11:30:18
Summenprodukt mit mehreren Bedungungen (mit Jahr aus Datum)
18.05.2024 10:04:28
Spielzeit von MP4 Dateien auslesen
17.05.2024 20:08:47
Datum/Zeit in einer Zelle fixieren über Makros
17.05.2024 18:14:48
Aaaah! Tabelle erstellen mit Index
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1948to1952
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1948to1952
1948to1952
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Keinen Zahl kleiner 1 in TextBox zulassen

Keinen Zahl kleiner 1 in TextBox zulassen
23.10.2023 00:09:40
Luna
Hallo ins Forum,
eine kurze Frage an euch Experten. Ich habe eine Textbox die beim starten der UF auf 1 steht. Es können nur Zahlen von 0-9 eigegeben werden. Über die händische Eingabe oder einen Spinbutton kann der Wert erhöht oder verringert werden. Wie stelle ich es an das das SpinbuttonDown Event sagen wir mal stoppt wenn der Wert unter 1 gehen soll, bedeutet wenn die 1 in der TextBox erscheint verringert sich der Wert auch nicht wenn ich den Button drücke und das auch händisch keine Wert unter 1 eingegeben werden kann? Geht das überhaupt? Mit 0 als niedrigsten Wert kann ich auch noch leben ;-) ;-)
Vielen Dank an alle die hier immer wieder uns Laien retten.
Luna

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Keinen Zahl kleiner 1 in TextBox zulassen
23.10.2023 00:21:19
Ulf
Hi Luna
bspw. 


Private Sub SpinButton1_Change()

    Me.SpinButton1.Min = 1

    Me.TextBox1.Value = Me.SpinButton1.Value

End Sub

oder in 


Private Sub UserForm_Initialize()

    Me.SpinButton1.Min = 1

End Sub

hth
Ulf
AW: Keinen Zahl kleiner 1 in TextBox zulassen
23.10.2023 00:36:26
Luna
Hallo Ulf,
super Danke. Damit hätte ich den Spinbutton schonmal gelöst. Wenn möglich fehlt mir dann nur noch das man auch händisch keinen Wert kleiner 1 eingeben kann.
Danke
Luna
AW: Keinen Zahl kleiner 1 in TextBox zulassen
23.10.2023 01:19:49
Ulf
Hi 


Private Sub TextBox1_Change()

    Static bArbeitet As Boolean

    Dim strText As String

    If bArbeitet = True Then

        Exit Sub

    End If

    bArbeitet = True

    strText = Me.TextBox1.Text

    If IsNumeric(strText) Then

        If CLng(strText)  1 Then

            Me.TextBox1.Text = 1

        End If

    Else

        'ggf

        'Me.TextBox1.Text = 1

        'oder

        Me.TextBox1.Text = ""

    End If

    bArbeitet = False

End Sub

hth
Ulf
Anzeige
AW: Keinen Zahl kleiner 1 in TextBox zulassen
23.10.2023 01:26:45
Luna
Super Spitzenklasse Ulf.
Vielen Dank für die klasse Arbeit.
Luna

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige