Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: nachkommastellen begrenzen

nachkommastellen begrenzen
06.01.2006 15:23:28
Simon
hallo Forum,
hab mal wieder eine Frage, komm leider nicht selber drauf.
Fülle eine Listbox mit werten von nur einer Zeile so
lstzeile.List = Range(Cells(aktuellezeile, 107),Cells(aktuellezeile, 113)).Value
mein Problem die werte wo in den Zeilen stehn haben ziemlich viele Nachkomma
stellen, ich möchte in der Lst aber nur max 2 nachkommastellen haben
wie mache ich das ?
gruß simon
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: nachkommastellen begrenzen
06.01.2006 15:36:05
DieterB
Hallo simon,
NumberFormat = "0.00"
Gruß DieterB
AW: nachkommastellen begrenzen
06.01.2006 15:45:29
Simon
Hallo Dieter
wie wird das NumberFormat im Code eingebaut?
AW: nachkommastellen begrenzen
06.01.2006 16:43:05
Peter
Hallo Simon, das Format muss vorn natürlich ein Komma, keinen Punkt enthalten: "#,##0.00"
Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Anzeige
AW: nachkommastellen begrenzen
06.01.2006 16:40:30
Peter
Hallo Simon,
versuch es so:
lstzeile.List = _
Format(Range(Cells(aktuellezeile, 107), Cells(aktuellezeile, 113)).Value, "#.##0.00")
Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
AW: nachkommastellen begrenzen
06.01.2006 17:59:21
Simon
Hallo Peter
läuft leider noch nicht, habs ganz genau so ins Makro eingebaut, es kommt die Fehler meldung
Typen unverträglich
fällt dir noch was ein?
Anzeige
AW: nachkommastellen begrenzen
06.01.2006 20:30:17
Peter
Hallo Simon,
leider nein, deshalb Frage wieder auf Offen gestellt.
Viele Grüße Peter
AW: nachkommastellen begrenzen
06.01.2006 22:12:54
Peter
Hallo Simon,
mit dem folgenden Makro habe ich die ListBox erfolgreich befüllt - mit zwei Nachkommastellen, obwohl meine Eingabe viel mehr Stellen hatte.

Sub Versuch()
Dim aktuelleZeile As Integer: aktuelleZeile = 15
Dim iSpalte       As Integer
With ActiveSheet.ListZeile
.Clear
.ColumnCount = 1
For iSpalte = 7 To 13
.AddItem Format(Cells(aktuelleZeile, iSpalte), "#,##0.00")
Next iSpalte
End With
End Sub

Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Anzeige
Hey danke, cool,funktioniert jetzt super
06.01.2006 22:57:57
Simon
.
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Nachkommastellen in Excel begrenzen


Schritt-für-Schritt-Anleitung

Um in Excel die Nachkommastellen auf 2 zu begrenzen, kannst du folgende Schritte befolgen:

  1. Öffne dein Excel-Dokument.
  2. Wähle die Zellen aus, die du formatieren möchtest.
  3. Rechtsklick auf die Auswahl und wähle „Zellen formatieren…“.
  4. Gehe zum Tab „Zahlen“ und wähle „Zahl“ aus.
  5. Stelle die Dezimalstellen auf 2 ein.
  6. Klicke auf „OK“, um die Änderungen zu übernehmen.

Wenn du dies in VBA umsetzen möchtest, kannst du das folgende Makro verwenden, um die Nachkommastellen beim Befüllen einer ListBox zu begrenzen:

Sub NachkommastellenBegrenzen()
    Dim aktuelleZeile As Integer: aktuelleZeile = 1 ' Ändere dies nach Bedarf
    Dim iSpalte As Integer
    With ActiveSheet.ListBox1 ' Passe den Namen der ListBox an
        .Clear
        .ColumnCount = 1
        For iSpalte = 1 To 5 ' Anzahl der Spalten anpassen
            .AddItem Format(Cells(aktuelleZeile, iSpalte), "#,##0.00")
        Next iSpalte
    End With
End Sub

Häufige Fehler und Lösungen

Fehler 1: Typen unverträglich

  • Lösung: Vergewissere dich, dass die Zellen, die du formatierst, tatsächlich Zahlen enthalten. Der Format-Befehl funktioniert nicht bei Text.

Fehler 2: ListBox zeigt falsche Werte an

  • Lösung: Überprüfe den Format-Befehl. Stelle sicher, dass du das richtige Trennzeichen verwendest, je nach deiner Region (z.B. "," oder ".").

Alternative Methoden

  1. Formeln verwenden: Du kannst auch die Funktion RUNDEN() nutzen, um die Nachkommastellen direkt in den Zellen zu begrenzen. Beispiel:

    =RUNDEN(A1, 2)
  2. Datenüberprüfung: Wenn du nur 2 Nachkommastellen zulassen möchtest, kannst du die Datenüberprüfung verwenden:

    • Wähle die Zellen aus.
    • Gehe zu „Daten“ > „Datenüberprüfung“ > „Zulassen: Dezimal“ und setze die Bedingungen.

Praktische Beispiele

Hier ist ein praktisches Beispiel zur Verwendung von VBA, um die Nachkommastellen in einer ListBox zu begrenzen:

Sub Beispiel()
    Dim aktuelleZeile As Integer: aktuelleZeile = 15
    Dim iSpalte As Integer
    With ActiveSheet.ListBox1 ' Passe den Namen der ListBox an
        .Clear
        .ColumnCount = 1
        For iSpalte = 7 To 13
            .AddItem Format(Cells(aktuelleZeile, iSpalte), "#,##0.00")
        Next iSpalte
    End With
End Sub

In diesem Beispiel wird die ListBox mit Werten aus den Zellen gefüllt, wobei die Nachkommastellen auf 2 begrenzt sind.


Tipps für Profis

  • Wenn du oft mit Nachkommastellen arbeitest, kannst du Makros erstellen, um die Formatierungen schnell anzuwenden.
  • Nutze die Funktion VBA nachkommastellen festlegen, um in deinen VBA-Projekten die Nachkommastellen effizient zu verwalten.
  • Experimentiere mit verschiedenen Format-Strings, um die Darstellung deiner Zahlen anzupassen.

FAQ: Häufige Fragen

1. Wie kann ich die Nachkommastellen in einer Excel-Berechnung auf 2 Kommastellen begrenzen? Du kannst die Zellen formatieren, indem du die Schritte in der Schritt-für-Schritt-Anleitung befolgst oder die RUNDEN()-Funktion verwenden.

2. Was ist der Unterschied zwischen „Nachkommastellen abschneiden“ und „Nachkommastellen runden“? Beim Abschneiden wird der Wert ohne Rundung verkürzt, während das Runden den Wert auf die nächste ganze Zahl basierend auf den Nachkommastellen anpasst.

3. Wie kann ich in VBA Nachkommastellen abschneiden? Du kannst die Format-Funktion verwenden, um die gewünschten Nachkommastellen festzulegen, wie im Beispiel oben gezeigt.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige