Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:23:24
Wenn-Formel anpassen
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
19.04.2024 11:45:34
Feld im SAP auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
832to836
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
832to836
832to836
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

TEXTFELD FEHLERBOX

TEXTFELD FEHLERBOX
03.01.2007 10:41:39
Servoazubi
Hallo liebe Experten,
ich habe einen Code für ein Eingabefeld, das wenn der Wert nicht 0 oder 1 ist direkt eine FehlerBox ausgeben soll. LEider funzt mien Code nicht. Nehmen wir an das Textfeld heisst txtfracht. Wir muss der Code richtig lauten .... ich wollte es mit if machen aber das geht nicht vernünftig bei mir.
Danke für eure hilfe

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: TEXTFELD FEHLERBOX
03.01.2007 10:46:28
egres
Hallo Servoazubi
So etwas geht über Daten/Gültigkeit!
Gruss
egres
AW: TEXTFELD FEHLERBOX
03.01.2007 10:51:12
Servoazubi
ich komm damit garnicht weiter sorry, brauche am besten nen code, da wenn ich was selber schriebe meistens das kleinste vergesse und dann garnix geht.
AW: TEXTFELD FEHLERBOX
03.01.2007 11:03:35
Hoffi
Hallo,
versuchs mit select Case
Select Case txtFracht.Text
Case 1,0
'Fehlerbox nicht anzeigen
Case Else
'Fehlerbox anzeigen
End select
ungetestet
Grüße
Hoffi
AW: TEXTFELD FEHLERBOX
03.01.2007 11:12:05
Servoazubi
kleine änderung ...... es soll ja nur eine fehlerboxkommen wenn der wert nicht eins oder null ist, wenn der wert 1 oder 0 ist soll nicht passieren
AW: TEXTFELD FEHLERBOX
03.01.2007 11:32:05
ChrisL
Hallo
Ich denke die Probleme stehen in Zusammenhang mit dem Datentyp (TextBox = Text). Daher würde ich mal mit String probieren z.B.:
Select Case txtFracht.Text
Case "1","0"
Case Else
MsgBox "Fehler"
End select
Gruss
Chris
Anzeige
AW: TEXTFELD FEHLERBOX
03.01.2007 11:35:11
Hoffi
Hallo,
das tut das Makro ja. wenn du eine 1 oder null eingibst, passiert nix, bei allen anderen eingaben, kommt die MsgBox.

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Select Case TextBox1.Text
Case 1, 0
Case Else
MsgBox "Fehler"
End Select
End Sub

wenn es mit diesem code nicht klappt,dann nimm den Tip von Chris, also die 1 und die 0 in "" setzen.
Grüße
Hoffi
AW: TEXTFELD FEHLERBOX
03.01.2007 11:35:53
egres
Hallo
gib mal etwas anders als 0 oder 1 in Zelle a1 ein : https://www.herber.de/bbs/user/39332.xls
Egres...
Anzeige

Links zu Excel-Dialogen

TextBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige