Werte immer abrunden (VBA)

Forumthread: Werte immer abrunden (VBA)

19.12.2005 20:58:17

Tim

Hallo,
wie lautet die Funktion mit der ich immer abrunden kann (also Nachkommastellen abschneiden) ?
Also aus 2.0, 2.1, 2.5, 2.7, 2.9999 soll immer 2 werden.

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

int() .

ransi

int() .

ransi

Hallo
in excel heisst das ganzzahl().
in VBA int().
ransi

Infobox / Tutorial

Schritt-für-Schritt-Anleitung

Um Werte in Excel mit VBA immer abzurunden, kannst du die Funktion Int() verwenden. Diese Funktion schneidet alle Nachkommastellen ab und gibt nur den ganzzahligen Teil zurück. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
Klicke im Menü auf Einfügen und wähle Modul.
Füge den folgenden Code in das Modul ein:

Sub WerteAbrunden()
    Dim Zelle As Range
    For Each Zelle In Selection
        Zelle.Value = Int(Zelle.Value)
    Next Zelle
End Sub

Schließe den VBA-Editor.
Markiere die Zellen, die du abrunden möchtest.
Drücke ALT + F8, wähle WerteAbrunden aus und klicke auf Ausführen.

Jetzt werden alle markierten Werte auf die nächste ganze Zahl abgerundet!

Häufige Fehler und Lösungen

Fehler: Das Makro funktioniert nicht.
- Lösung: Stelle sicher, dass du die Zellen markiert hast, bevor du das Makro ausführst.
Fehler: Nach dem Ausführen des Makros bleiben die Werte unverändert.
- Lösung: Überprüfe, ob die Zellen, die du abrunden möchtest, Zahlen sind. Textwerte müssen zuerst in Zahlen konvertiert werden.

Alternative Methoden

Neben der Verwendung von VBA gibt es auch in Excel selbst Möglichkeiten, Werte abzurunden. Eine dieser Methoden ist die Verwendung der Funktion ABRUNDEN(). Hier ist, wie du sie anwendest:

Wähle eine Zelle aus, in der das Ergebnis angezeigt werden soll.
Gib die Formel ein:
```
=ABRUNDEN(A1; 0)
```
Dabei ist A1 die Zelle, die du abrunden möchtest und 0 steht für die Anzahl der Nachkommastellen.

Diese Methode funktioniert für einfache Abrundungen, allerdings nicht für große Datenmengen, wo VBA eine bessere Leistung bietet.

Praktische Beispiele

Beispiel mit VBA:
- Wenn du die Werte in den Zellen A1 bis A5 hast (2.0, 2.1, 2.5, 2.7, 2.9999) und das oben genannte VBA-Makro ausführst, werden alle Werte auf 2 abgerundet.
Beispiel mit der Funktion ABRUNDEN:
- Für den Wert 3.7 in Zelle B1, könntest du in C1 die Formel =ABRUNDEN(B1; 0) verwenden, um 3 zu erhalten.

Tipps für Profis

Wenn du häufig mit großen Datenmengen arbeitest, solltest du die VBA-Methode verwenden, da sie effizienter ist als die Verwendung von Excel-Formeln.
Du kannst das VBA-Makro anpassen, um spezifische Bereiche oder Bedingungen zu berücksichtigen, z.B. nur positive Zahlen abzurunden.
Experimentiere mit der Funktion RUNDEN(), wenn du gelegentlich auf die nächste ganze Zahl aufrunden möchtest.

FAQ: Häufige Fragen

1. Wie kann ich Werte in einem bestimmten Bereich abrunden?
Du kannst das Makro anpassen, indem du Set Zelle = Range("A1:A10") hinzufügst, um nur diesen Bereich zu bearbeiten.

2. Gibt es eine Möglichkeit, das Ergebnis in einer anderen Zelle anzuzeigen?
Ja, du kannst das Makro so ändern, dass das Ergebnis in einer neuen Zelle gespeichert wird, anstatt die Ausgangswerte zu überschreiben.

3. Funktioniert das Abrunden auch in älteren Excel-Versionen?
Ja, die VBA-Funktionen sind in den meisten Excel-Versionen verfügbar. Stelle sicher, dass du die richtige Syntax verwendest.

Beliebteste Forumthreads (12 Monate)