Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
564to568
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
564to568
564to568
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Runden

Runden
14.02.2005 11:03:07
Detlef
Hallo zusammen,
ich habe in Spalte D, viele Werte die ich
auf zwei stellen alle auf einmal runden möchte.
Wie muß ich den Code anpassen das mit
ActiveCell.FormulaR1C1 = "=ROUND(RC,2)" nach
einander jede Zelle in Spalte D gerundet wird ?
Gruß Detlef

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Runden
Stefan
Hallo Detlef,
versuchs mal so:

Sub test()
For a = 5 To Worksheets("Monatsbeträge").Range("D65536").End(xlUp).Row
Cells(a, 7).Value = Round(Cells(a, 7), 0)
Next a
End Sub

Gruß Stefan
AW: Runden
Stefan
Sorry, war falsch

Sub test()
For a = 5 To Worksheets("Monatsbeträge").Range("D65536").End(xlUp).Row
Cells(a, 4).Value = Round(Cells(a, 4), 0)
Next a
End Sub

AW: Runden
15.02.2005 08:42:48
Detlef
Hallo Stefan,
besten Dank für Dein Tipp. Leider wird kein Wert gerundet.
Habe den Code getestet, die bestehenden Zahlen in Spalte D
werden nicht gerundet.
Hast Du noch eine Idee ?
Gruß Detlef
Anzeige
AW: Runden
Stefan
Hallo Detlef,
lade mal eine Beispieldatei hoch.
Gruß Stefan
AW: Runden
15.02.2005 13:38:17
Detlef
Hallo Stefan,
es funkt !
Cells(a, 4).Value = Round(Cells(a, 4), 2)
habe die Null letzte Klammer durch eine 2 ersetzt, da ich
zwei Stellen nach dem Komma Runden möchte.
Besten Dank
Gruß Detlef

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige