Zahlen runden

Hallo zusammen.
Ich würde gerne Zahlen runden, wiß aber nicht wie da funktionieren soll!
Durch eine Berechnung in meinem Programm bekomme ich Werte, deren Nachkommastellen nie die gleiche Anzahl haben, wie z.B 9,3672356, 5,3333333333333 oder 8,65. Diese muß ich irgendwie auf nur eine Nachkommastelle runden.

Geht das irgendwie und wenn ja, wie?

Gruß, Axel

Hallo Axel,

Ich würde gerne Zahlen runden, wiß aber nicht wie da
funktionieren soll!
Durch eine Berechnung in meinem Programm bekomme ich Werte,
deren Nachkommastellen nie die gleiche Anzahl haben, wie z.B
9,3672356, 5,3333333333333 oder 8,65. Diese muß ich irgendwie
auf nur eine Nachkommastelle runden.

Geht das irgendwie und wenn ja, wie?

ja, mit Round(Zahl,Nachkommastellen)

Gruß, Rainer

Hallo Raine, so hört man sich wieder.

Habs so versucht:

Round(TN,1)

TN ist die Zahl die ich runden möchte.
Wird mir aber rot angezeigt, also irgendwie ein Syntax-Fehler.

Gruß, Axel

Hi Axel,

Hallo Rainer, so hört man sich wieder.

Habs so versucht:

Round(TN,1)

TN ist die Zahl die ich runden möchte.
Wird mir aber rot angezeigt, also irgendwie ein Syntax-Fehler.

da habe ich mich wohl mißverständlich ausgedrückt, sorry.

Option Explicit

Private Sub Command1\_Click()
 Dim TN As Double
 TN = 34.34567543
 TN = Round(TN, 1)
 Command1.Caption = TN
End Sub

so besser? :smile:

Gruß, Rainer

Du brauchst dich nicht bei mir zu entschuldigen!
Das funktioniert jedenfalls sehr gut!

Vielen Dank, Axel