Office: Fixe Vorkommastelle

Hallo erstmal ich bin der Neue

Ich kenne mich leider nicht so gut mit Excel aus.
Es geht darum dass ich eine Menge Zahlen eingeben muss.
Die Vorkommastelle ist fest, es geht darum dass ich nur die Nachkommastellen eingeben muss.
Gibt es dafür eine einfache Lösung?

Vielen Dank im Voraus.

 

Hi und willkommen,

man könnte das mit VBA lösen. Dazu müsste man aber mehr von deinem Tabellenaufbau wissen, also wo genau sollen die Werte eingegeben werden und welchen Wert die Vorkommastelle haben soll.

---

 

Hey Beverly

Es soll eine Tabelle mit 3 Spalten sein.
Eine Spalte mit fortlaufenden Nummern.
Und in die anderen beiden sollen einfach nur die Werte eingeben werden.
Die fixe Vorkommazahl ist 6

 

Hi,

gib deine Werte mit Komma ein, also ",123" oder ",98" (natürlich ohne die Anführungszeichen). Excel macht daraus dann automatisch "0,123" oder "0,98". Dann gibst du irgendwo deine Vorkommazahl ein und drückst Strg-C (oder Rechtsklick-->Kopieren). Alle Zellen mit den Nachkommazahlen markieren, Rechtsklick-->"Inhalte einfügen...", Einfügen: Werte und Vorgang: Addieren auswählen, OK klicken. Jetzt wird deine Vorkammazahl zu allen markierten Zellen hinzugezählt.

 

Hallo Vicator,

eine einfache Alternative wäre ein benutzerdefiniertes Zahlenformat: 6,000 in den Zellen. Dort gib Deine Nachkommastellen beginnend mit dem Komma ein. Aber beachte: wenn Du die Zahlenwerte mit der 6 auswerten willst, mußt Du die führende 6 in die entsprechende Formel mit einbauen.

 

Hi,

du hast leider nicht geschrieben, in WELCHE Spalten du die Zahlen eintragen möchtest - ich bin von Spalte B und C ausgegangen, musst du anpassen.

Folgenden Code ins Codemodul des Tabellenblattes:

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 2 Or Target.Column = 3 Then '<== Eingabe erfolgt in Spalte B und C
        If IsNumeric(Target) Then
            Application.EnableEvents = False
            Target = 1 * (6 & "," & Target) '<== Eingabe der Nachkommaziffern wird umgewandelt
            Application.EnableEvents = True
        End If
    End If
End Sub

Einfahc nur die Nachkommaziffern eingeben und die Eingabe wird umgewandelt in 6,...

---