Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
1596to1600
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

UF Textboxen berechnen liefert falsches Ergebnis

UF Textboxen berechnen liefert falsches Ergebnis
03.01.2018 09:25:02
Sigi
Hallo,
wenn ich in einer UF die Zextboxen addieren will, wird z.B. 1,50 als Ergebnis mit 1,00 angezeigt.
Die Textboxen 1 -4 müssen nicht unbedingt einen Wert enthalten.
Wo liegt der Fehler?
Danke!
Gruß
Sigi
https://www.herber.de/bbs/user/118637.xlsm

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: UF Textboxen berechnen liefert falsches Ergebnis
03.01.2018 09:45:39
Sepp
Hallo Sigi,
das Problem lag hier (und in den Change-Events der anderen Textboxen) bei Val(), da bei einer Zahl mit Komma, nur der ganzzahlige Anteil zurückgegeben wird!
Private Sub txtFAStd1_Change()
Dim cnt As Control
Dim dValue As Double
For Each cnt In Controls
  If Right(cnt.Name, 4) = "Std1" Then
    If IsNumeric(cnt.Value) Then dValue = dValue + CDbl(cnt.Value)
  End If
Next cnt
txtStdG1.Text = Format(dValue, "0.00")
End Sub

Gruß Sepp

Anzeige
AW: UF Textboxen berechnen liefert falsches Ergebnis
03.01.2018 09:48:12
Sigi
Hallo Sepp,
vielen Dank!
Funktioniert einwandfrei.
Gruß
Sigi

310 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige