Hallo Zusammen, allen einen wunderschönen Abend!
Ich hoffe ihr hattet alle ein wunderbares Weihnachtsfest?
Nun zu meiner Frage:
Mittels folgendem Codeausschnitt wird eine Berechnung durchgeführt.
If TextBox18.Value > 12 Then
TextBox10.Value = Val(TextBox18.Value)) - 12
End If
Steht aber in der TextBox18 z.B. 13,5 ist das Ergebnis 1.
Ändere ich den Code:
If TextBox18.Value > 12 Then
TextBox10.Value = Round(CDbl(TextBox18.Value)) - 12
End If
Dann ist das Ergebnis 2 und wieder nicht wie gewünscht 1,5. Was mache ich falsch!!! Für Hilfe wie immer sehr dankbar!
Herzlichst Frank H.