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

Ansicht des Beitrags:
Von:
Simon
Datum:
02.06.2021 18:45:04
Views:
102
Rating: Antwort:
  Ja
Thema:
Größer Kleiner Vergleich

Guten Abend,

ich würde bei meinem VBA Programm gerne die Werte von 2 Textfeldern vergleichen und je nachdem etwas ausrechnen. Leider kommt bei meiner If Abfrage immer heraus, dass der Wert des ersten Textfeldes größer ist als der des zweiten auch wenn das eigentlich nicht der Fall ist.

Das ist der Code:

 
        If Me.txtGrenzschlankheitsgrad.Value >= Me.txtvorhSchlankheitsgrad.Value Then
        Me.lblKSEuler.Visible = False
        Me.txtKnickspannungEuler.Visible = False
        Me.txtKnickspannungTetmajer.Value = Val(Replace(Replace((Tabelle9.Cells(Me.cboMaterial.ListIndex + 2, 4) - (Tabelle9.Cells(Me.cboMaterial.ListIndex + 2, 5) * Me.txtvorhSchlankheitsgrad.Value) + (Tabelle9.Cells(Me.cboMaterial.ListIndex + 2, 6) * (Me.txtvorhSchlankheitsgrad.Value) ^ (2))), ".", ""), ",", "."))
        
        End If
        
        If Me.txtGrenzschlankheitsgrad.Value <= Me.txtvorhSchlankheitsgrad.Value Then
        
        
        Me.lblKSTetmajer.Visible = False
        Me.txtKnickspannungTetmajer.Visible = False
        Me.txtKnickspannungEuler.Value = Val(Replace(Replace(((9.8696 * (Tabelle9.Cells(Me.cboMaterial.ListIndex + 2, 2))) / ((Me.txtvorhSchlankheitsgrad.Value) ^ (2))), ".", ""), ",", "."))
        End If

Kann mir jemand Sagen warum hier immer die erste If Bedingung erfüllt ist und die zweite nie laut VBA?

 

 


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