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

Forumthread: Runden ganze Zahlen, Matrix, Bereich

Runden ganze Zahlen, Matrix, Bereich
19.02.2009 19:30:00
Roger
Hallo Leute
Auf dem Netz habe ich ein Makro gefunden, das mir glaube ich helfen könnte und habe das etwas angepasst. Nun funktioniert das leider aber nicht.
Fehlermeldung: Objekt erforderlich
Ziel: Ich habe eine Matrix, bei der ich die Zahlen auf ganze Zahlen runden möchte.
Das ist mein erster Versuch mit einem Makro zu arbeiten, weshalb ich nicht wirklich eine Ahnung habe...
Danke für eure Hilfe. Nachfolgend das Makro:

Sub runden()
Dim rngBer As Range
Dim rngZelle As Range
Set rngBer = Application.InputBox(prompt:="Bitte Bereich mit Maus auswählen", Type:=1)
For Each rngZelle In rngBer
rngZelle.Value = WorksheetFunction.Round(rngZelle.Value, 0)
Next
End Sub


Anzeige

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

Betreff
Datum
Anwender
Anzeige
Markiere doch erst den Bereich ...
19.02.2009 19:41:00
Matthias
Hallo
eine Alternative:
Markiere doch erst den Bereich und starte dann erst das Makro

Option Explicit
Sub runden()
Dim Rng As Range
For Each Rng In Selection
Rng.Value = WorksheetFunction.Round(Rng.Value, 0)
Next
End Sub


Gruß Matthias

Anzeige
AW: Markiere doch erst den Bereich ...
20.02.2009 08:52:00
Roger
Hallo Matthias
Vielen Dank für deinen Vorschlag. Der funktioniert soweit ganz gut. Bis ich zu den Zellen komme, wo ich Sterne * drin habe. Das war wohl auch schon vorher das Problem! Sieh dir doch mal den Vorschlag von Sepp an, der ist ziemlich viel schneller als deine Lösung. Aber auch dort kommen die Sterne in die Quere!
Gruss, Roger
Anzeige
AW: Runden ganze Zahlen, Matrix, Bereich
19.02.2009 19:44:00
Josef
Hallo Roger,
das geht zB. so.
Sub runden()
    Dim rngBer As Range
    Dim rngZelle As Range
    
    On Error Resume Next
    Set rngBer = Application.InputBox(prompt:="Bitte Bereich mit Maus auswählen", Type:=8)
    On Error GoTo 0
    
    If Not rngBer Is Nothing Then
        For Each rngZelle In rngBer
            If IsNumeric(rngZelle) Then _
                rngZelle.Value = WorksheetFunction.Round(rngZelle.Value, 0)
        Next
    End If
    
End Sub

Schau dir in der OH mal den Parameter Type an.
Gruß Sepp

Anzeige
AW: Runden ganze Zahlen, Matrix, Bereich
20.02.2009 08:46:00
Roger
Hallo Sepp
Vielen Dank für deine Hilfe. Habe nun auch gemerkt, warum vorher die Fehlermeldung kam. Ich habe in einigen Zellen einen Stern * drin, da es dort keine Werte hat und das war ziemlich sicher das Problem. Wenn ich mit deiner Anpassung nämlich diesen Bereich auch markiere, passiert gar nichts. Wenn ich den Bereich mit den Sternen jedoch weglasse, werdend die Zahlen gerundet.
Also vielen Dank noch einmal!
Gruss, Roger
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Runden von ganzen Zahlen in Excel-Matrizen


Schritt-für-Schritt-Anleitung

Um in Excel eine Matrix von Zahlen auf ganze Zahlen zu runden, kannst du ein Makro verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Füge ein neues Modul ein, indem du auf Einfügen > Modul klickst.

  3. Kopiere den folgenden Code in das Modul:

    Sub runden()
       Dim rngBer As Range
       Dim rngZelle As Range
       On Error Resume Next
       Set rngBer = Application.InputBox(prompt:="Bitte Bereich mit Maus auswählen", Type:=8)
       On Error GoTo 0
    
       If Not rngBer Is Nothing Then
           For Each rngZelle In rngBer
               If IsNumeric(rngZelle) Then
                   rngZelle.Value = WorksheetFunction.Round(rngZelle.Value, 0)
               End If
           Next
       End If
    End Sub
  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Markiere den Bereich der Zahlenmatrix, die du runden möchtest.

  6. Führe das Makro aus, indem du ALT + F8 drückst, das Makro auswählst und auf Ausführen klickst.

Mit dieser Methode kannst du schnell in Excel ganze Zahlen runden.


Häufige Fehler und Lösungen

  • Fehlermeldung: Objekt erforderlich
    Diese Fehlermeldung tritt auf, wenn du einen Bereich auswählst, der keine Zahlen enthält (z.B. leere Zellen oder Zellen mit Sternen). Stelle sicher, dass du nur Zellen mit Zahlen auswählst.

  • *Makro funktioniert nicht bei Sternen ()**
    Wenn deine Matrix Zellen mit Sternen enthält, die keine Werte haben, wird das Makro diese Zellen ignorieren. Achte darauf, dass du nur die relevanten Zellen auswählst.


Alternative Methoden

Falls du kein Makro verwenden möchtest, kannst du auch die integrierten Excel-Funktionen nutzen, um ganze Zahlen zu runden:

  • RUNDEN-Funktion:
    Verwende die Formel =RUNDEN(A1, 0), um die Zahl in Zelle A1 auf eine ganze Zahl zu runden.

  • AUFRUNDEN-Funktion:
    Verwende =AUFRUNDEN(A1, 0), um die Zahl in Zelle A1 immer auf die nächste ganze Zahl aufzurunden.

Diese Methoden sind besonders nützlich, wenn du nur eine kleine Anzahl von Zellen bearbeiten möchtest.


Praktische Beispiele

Hier sind einige praktische Beispiele, wie du die Funktionen in Excel anwenden kannst:

  1. Runden einer Spalte von Zahlen:
    Angenommen, du hast eine Liste von Zahlen in den Zellen A1 bis A10. Du kannst in Zelle B1 die Formel =RUNDEN(A1, 0) eingeben und nach unten ziehen, um alle Werte zu runden.

  2. Runden einer Matrix mit einem Makro:
    Wenn du ein ganzes Zahlenfeld hast, kannst du mit dem oben genannten Makro einfach die Zellen auswählen und das Makro ausführen, um alle Werte auf ganze Zahlen zu runden.


Tipps für Profis

  • Verwende die Funktion RUNDEN in Kombination mit anderen Funktionen: Du kannst die RUNDEN-Funktion in komplexeren Formeln verwenden, um Berechnungen zu optimieren.

  • Nutze bedingte Formatierungen: Markiere Zellen, die nicht gerundet werden können (z.B. aufgrund von Text), um sie leichter zu identifizieren.

  • Speichere dein Makro: Wenn du häufig mit großen Datenmengen arbeitest, speichere dein Makro in der Arbeitsmappe, um es schnell wiederverwenden zu können.


FAQ: Häufige Fragen

1. Wie kann ich eine Matrix in Excel auf ganze Zahlen runden?
Du kannst entweder die RUNDEN-Funktion oder ein Makro verwenden, um die Zahlen auf ganze Zahlen zu runden.

2. Was mache ich, wenn das Makro nicht funktioniert?
Überprüfe, ob der ausgewählte Bereich nur Zahlen enthält und keine leeren Zellen oder Zeichen wie Sterne.

3. Kann ich das Makro anpassen?
Ja, du kannst das Makro nach deinen Bedürfnissen anpassen, zum Beispiel um andere Rundungsregeln anzuwenden.

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