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

runden-funktion einfügen mit vba

Forumthread: runden-funktion einfügen mit vba

runden-funktion einfügen mit vba
15.06.2004 16: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 16: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 17:03:21
Werner
x
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum