Thema Datum  Von Nutzer Rating
Antwort
08.05.2021 21:50:18 David
NotSolved
Blau InputBox bricht bei zweiter Falscheingabe ab ??
 09.05.2021 00:05:00 ralf_b
*****
Solved
09.05.2021 10:58:23 Gast68947
NotSolved

Ansicht des Beitrags:
Von:
ralf_b		 Datum:
09.05.2021 00:05:00		 Views:
130		 Rating:
     
Antwort:
 Nein
Thema:
InputBox bricht bei zweiter Falscheingabe ab ??		 
Hallo  David,

Hier ein Vorschlag. 

Sub getInput()

    Dim sMessage As String, sTitle As String, sDefault As String, MyValue
    Dim bExit As Boolean

    sMessage = "Nummer eingeben:" & vbNewLine & vbNewLine & "(lfd. Nr.) 1 bis 428"
    sTitle = " Datenblatt erstellen"
    sDefault = "1"
        
    Do
        bExit = False
        MyValue = InputBox(sMessage, sTitle, sDefault)
                    
        If IsNumeric(MyValue) Then
           If CInt(MyValue) < 1 Or CInt(MyValue) > 428 Then bExit = True
        Else
           bExit = True
        End If
        
        If bExit Then
            MsgBox "Kein Eintrag gefunden.", vbCritical
            bExit = False
        End If
        
    Loop While bExit = True
End Sub

gruß
rb

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
08.05.2021 21:50:18 David
NotSolved
Blau InputBox bricht bei zweiter Falscheingabe ab ??
 09.05.2021 00:05:00 ralf_b
*****
Solved
09.05.2021 10:58:23 Gast68947
NotSolved