Thema Datum  Von Nutzer Rating
Antwort
09.03.2007 23:35:45 Michael
NotSolved
11.03.2007 15:56:23 Stef_113
NotSolved
Rot Aw:Aw:feld in user form auf gültigkeit prüfen
11.03.2007 16:01:49 Stef_113
NotSolved
11.03.2007 16:06:18 Stef_113
NotSolved

Ansicht des Beitrags:
Von:
Stef_113
Datum:
11.03.2007 16:01:49
Views:
1200
Rating: Antwort:
  Ja
Thema:
Aw:Aw:feld in user form auf gültigkeit prüfen
Hallo Michael,

sry, ich bins nochmal, mein Computer hatte eben irgendwie schwierigkeiten den Text einzufügen. Ich hoffe er diesesmal zeigt ers richtig an.

CODE:
---------------------------------------------------------------------------------------
Private Sub Textfeld1_Exit(ByVal Cancel As MSForms.ReturnBoolean)

'Deklarierung der Variablen
Dim T1, T2 As Long
Dim Meldung

If Textfeld1.Text <> "" Then
If Not IsNumeric(Textfeld1.Text) Then
Meldung = MsgBox("Bitte geben Sie eine Zahl ein.", _
vbExclamation, "Ungültige Zahl")
Cancel = True
Else
T1 = CLng(Textfeld1.Text) ' Jetzt kann Textfeld1 eingelesen werden.
If Textfeld2.Text <> "" And IsNumeric(Textfeld2.Text) Then
T2 = CLng(Textfeld2.Text) ' Jetzt wird Textfeld 2 eingelesen
If T1 "" Then
T1 = CLng(Textfeld1.Text) ' Jetzt wird Textfeld 1 eingelesen
If T1 < T2 Then
MsgBox "Bitte geben Sie eine Zahl ein, " & _
"die kleiner ist als die oben eingetragene.", vbExclamation, "Ungültige Zahl"
Cancel = True
End If
End If
End If
End Sub
---------------------------------------------------------------------------------------
Stefan

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
09.03.2007 23:35:45 Michael
NotSolved
11.03.2007 15:56:23 Stef_113
NotSolved
Rot Aw:Aw:feld in user form auf gültigkeit prüfen
11.03.2007 16:01:49 Stef_113
NotSolved
11.03.2007 16:06:18 Stef_113
NotSolved