Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

runden-funktion einfügen mit vba

Forumthread: runden-funktion einfügen mit vba

runden-funktion einfügen mit vba
15.06.2004 14:20:09
norbert
Hallo,
als vba-anfänger scheiter ich an folgendem makro zum nachträglichen hinzufügen der runden-funktion in einzelne zellen:
wert = ActiveCell.Value
f = "=runden(" & wert & ";2)" 'führt zum laufzeitfehler 1004 !!!
ActiveCell.Formula = f
was mache ich falsch ?
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: runden-funktion einfügen mit vba
Kurt
Option Explicit

Sub runde()
Dim wert As Double, f As String
wert = ActiveCell.Value
f = "=runden(" & wert & ";2)"
ActiveCell.FormulaLocal = f
End Sub

Empfehle noch eine Fehlerbehandlung, falls die Zelle keine Zahl enthält.
Kurt
AW: runden-funktion einfügen mit vba
norbert
hallo kurt , hallo werner
beides funktioniert prima, vielen dank !
norbert
Anzeige
AW: runden-funktion einfügen mit vba
15.06.2004 14:27:18
Werner
Grüezi Norbert
wert = ActiveCell.Value
ActiveCell = Round(wert, 2)
Diese Zeilen genügen schon
Gruss Werner
Danke für die Rückmeldung OT
15.06.2004 15:03:21
Werner
x
;

Forumthreads zu verwandten Themen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige