Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
632to636
632to636
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zahlen runden

Forumthread: Zahlen runden

Zahlen runden
04.07.2005 20:43:44
Maxine
Hallo!
Ich habe einen Bereich, der mit Zahlen gefüllt ist. Alle diese Zahlen möchte ich jetzt auf Dezimalstellen runden.
Frage: Wie baue ich da jetzt diese Round Funktion ein? Excel Hilfe hilft da leider nicht weiter...
LG, Maxine
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zahlen runden
04.07.2005 21:02:46
Conny
Hi Maxi,
Warum Hilft Excel da nicht?
Du kannst entweder
Format -&gt Zahlen -&gt Zahl ~f~
verwenden, dann bleiben die Werte erhalten, werden nur in den Zellen anders dargestellt.
oder
~f~ = Runden(Zahl,Stellenanzahl)
Die Zahl kann ein Bezug auf eine andere Zelle oder dort eingetragen werden, auch Formeln sind möglich.
Die Stellenanzahl gibt die Nachkomastellen an.
Gruß Conny
Anzeige
AW: Zahlen runden
04.07.2005 21:14:12
Maxine
Hi Conny,
also genauer genommen suche ich die Lösung zu folgendem VBA Code:

Sub Aufgabe2()
Dim Bereich As Range
Worksheets(1).Range("A1").Activate
Set Bereich = ActiveCell.CurrentRegion
'hier möchte ich die Round-Funktion einbauen.. nur wie? Bereich = Round(Bereich, 2) geht zumindest nicht. Ich bin verwirrt. :)
End Sub

Ecxel hilft insofern nicht weiter, da ich beim "Round-Funktion" Eintrag Beispiele vermisse... ;) Kann man überhaupt Inhalte eines Range Objektes runden?
LG, Maxine
Anzeige
AW: Zahlen runden
04.07.2005 21:42:18
Conny
Diese zwei Zeilen wären genug um in B1 einen gerundeten Wert aus A1 anzugeben, die 1 hinter dem Koma sind die Nachkomastellen.
Range("B1").Select
ActiveCell.FormulaR1C1 = "=ROUND(R[0]C[-1],1)"
Beispiel:
A1 = 4,532 von Dir eingegeben
B1 = 4,5 vom Makro berechnet
Aber warum willst das mit nem Makro machen?
Gruß Conny
Anzeige
AW: Zahlen runden
04.07.2005 21:44:44
ransi
hallo maxine
wenns unbedingt VBA sein soll versuchs mal so:
Option Explicit
Public 

Sub test()
Dim bereich As Range
Dim zelle As Range
Set bereich = Range("a1").CurrentRegion
On Error Resume Next
For Each zelle In bereich
zelle.Value = WorksheetFunction.Round(zelle, 2)
Next
End Sub

ransi
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige