Clever-Excel-Forum

Hallo allerseits

Ich hätte eine Frage ans Forum da Google keine Antwort wusste :). Kann man über "Zellen formatieren" eine Zelle so formatieren, dass sie die eingegebenen Werte in Fünferschritten rundet? Mit anderen worten, wenn ich in Zelle A1 den Wert "10.22" eingbebe/reinkopiere, dass dann in A1 "10.20" ausgegeben wird?

Die Formeln "runden()" kenn ich, ich müsste aber hierfür eine zusätzliche Spalte einfügen. Ich will aber, wenn möglich, nur ein Rohdatenfile reinkopieren müssen, aus welchem mir ein Buchungsbeleg erstellt wird. Komm aus der Schweiz die haben keine 0.01 Rappen daher dieses Problem. Ich hätte am liebsten eine Lösung ohne VBA wenns technisch machbar ist.

Beste Grüsse
Lido86

Hallo,

vielleicht so?
https://www.online-excel.de/excel//singsel.php?f=71#s15

Beachte den Punkt Runden kaufmännisch

Hallo

mir fällt nur eine VBA Lösung ein.

Hier für Spalte B

- Rechtsclick auf den Tabellenblattreiter
- Code anzeigen
- Code dort reinkopieren

Code:
Private Sub Worksheet_Change(ByVal Target As Range)

    Dim Z

    On Error GoTo Fehler

    Const APPNAME = "Worksheet_Change"

    If Target.Column = 2 Then

        For Each Z In Target.Cells

            If Z <> "" Then

                Application.EnableEvents = False

                Z.Value = Round(Z / 0.05, 0) * 0.05

            End If

        Next

    End If

    Err.Clear

Fehler:

    Application.EnableEvents = True

    If Err.Number <> 0 Then MsgBox "Fehler in Sub """ & APPNAME & """" & vbCrLf _

        & "Fehlernummer: " & Err.Number & vbLf & Err.Description: Err.Clear

End Sub

LG UweD

Danke für die Schnelle Antwort.

Ich versuchs mal so.

Beste Grüsse
Lido86

Danke auch an dich Uwe

Falls zellformatierung nix bringt, dann werd ich dein VBA mal einfügen und Versuchen.

Beste Gruss
Lido

Lido86

Steffl

UweD

Lido86