Thema Datum  Von Nutzer Rating
Antwort
Rot Unzuverlässige If-Prüfung
01.10.2019 19:54:46 Christian
NotSolved
01.10.2019 20:20:21 xlKing
NotSolved
01.10.2019 20:28:07 Christian
NotSolved
01.10.2019 20:30:29 Christian
NotSolved
01.10.2019 20:32:19 xlKing
NotSolved
01.10.2019 20:42:19 Christian
NotSolved
01.10.2019 20:48:13 xlKing
NotSolved
01.10.2019 20:50:31 Christian
NotSolved
01.10.2019 21:00:13 Christian
NotSolved
01.10.2019 21:02:49 xlKing
NotSolved
01.10.2019 20:42:10 xlKing
NotSolved
01.10.2019 20:50:58 Christian
NotSolved
01.10.2019 20:56:59 Christian
NotSolved
01.10.2019 21:04:15 xlKing
NotSolved
01.10.2019 21:10:16 Christian
NotSolved

Ansicht des Beitrags:
Von:
Christian
Datum:
01.10.2019 19:54:46
Views:
50
Rating: Antwort:
  Ja
Thema:
Unzuverlässige If-Prüfung

Hallo,

ich kämpfe gerade mit folgender unzuverlässiger IF-Prüung. Der Code soll prüfen, ob ein numerischer Wert zwischen 1 und 4 eingetragen wird (zugegeben Es wird noch nicht auf Ganzzahl geprüft). Mein Problem: Wenn ich nichts eintrage, wird dies wohl meistens als 0 erkannt --> MsgBox + End - aber manchmal auch nicht und der Code läuft weiter. 

Woran kann das liegen?

Grüße und Dank im Voraus
Christian


 

Sub InputboxOpenPdfQuartalDE()
    On Error Resume Next
        Quartal = Inputbox("Geben Sie das Quartal ein für welches das Reporting erstellt werden soll. Bitte nur Zahlenwerte eingeben.", "Quartal festlegen")
        If Not IsNumeric(Quartal) Or Quartal <= 0 Or Quartal > 5 Then
            MsgBox "Bitte nur Zahlen zwischen 1 und 4 ohne Satzzeichen eingeben"
            End
        End If
    On Error GoTo 0

End Sub

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • 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
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot Unzuverlässige If-Prüfung
01.10.2019 19:54:46 Christian
NotSolved
01.10.2019 20:20:21 xlKing
NotSolved
01.10.2019 20:28:07 Christian
NotSolved
01.10.2019 20:30:29 Christian
NotSolved
01.10.2019 20:32:19 xlKing
NotSolved
01.10.2019 20:42:19 Christian
NotSolved
01.10.2019 20:48:13 xlKing
NotSolved
01.10.2019 20:50:31 Christian
NotSolved
01.10.2019 21:00:13 Christian
NotSolved
01.10.2019 21:02:49 xlKing
NotSolved
01.10.2019 20:42:10 xlKing
NotSolved
01.10.2019 20:50:58 Christian
NotSolved
01.10.2019 20:56:59 Christian
NotSolved
01.10.2019 21:04:15 xlKing
NotSolved
01.10.2019 21:10:16 Christian
NotSolved