Thema Datum  Von Nutzer Rating
Antwort
02.06.2021 18:45:04 Simon
NotSolved
Blau Größer Kleiner Vergleich
 02.06.2021 19:02:53 Zwenn
NotSolved
02.06.2021 19:35:18 Simon
NotSolved

Ansicht des Beitrags:
Von:
Zwenn		 Datum:
02.06.2021 19:02:53		 Views:
592		 Rating:
     
Antwort:
  Ja
Thema:
Größer Kleiner Vergleich

Hallo Simon

Ich gehe jetzt nicht Deinen ganzen Code durch. Aber ein Textfeld enthält Text, keine Zahlen. Deshalb scheitert Dein Vergleich. Du kannst die eingegebenen Textwerte aber durch Typecasting direkt für den Vegleich umwandeln. An den anderen Stellen im Code kannst Du das entsprechend übernehmen.

Achtung: Wenn im Textfeld keine gültigen Werte eingetragen wurden, kommt es zu einem Laufzeitfehler. Solche Fehler musst Du als Programmierer selbst abfangen.

Wenn es sich um Fließkommazahlen handelt dann mit Cdbl(), für eine Umwandlung in Zahlen vom Datentyp Double:

 If Cdbl(Me.txtGrenzschlankheitsgrad.Value) >= Cdbl(Me.txtvorhSchlankheitsgrad.Value) Then

Wenn es sich um ganze Zahlen handelt, dann mit Clng(), für eine Umwandlung in Zahlen vom Datentyp Long:

 If Clng(Me.txtGrenzschlankheitsgrad.Value) >= Clng(Me.txtvorhSchlankheitsgrad.Value) Then

Mehr Infos zu Typecasting (Typenumwandlung) in VBA findest Du hier:

https://docs.microsoft.com/de-de/office/vba/language/concepts/getting-started/type-conversion-functions

Viele Grüße,

Zwenn

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
02.06.2021 18:45:04 Simon
NotSolved
Blau Größer Kleiner Vergleich
 02.06.2021 19:02:53 Zwenn
NotSolved
02.06.2021 19:35:18 Simon
NotSolved