Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Automatisch in Zelle Werte durch 1000 teilen

Automatisch in Zelle Werte durch 1000 teilen
30.05.2005 12:30:30
Matt
Hallihallo,
ich hab folgendes Problem:
In einer Zelle gibt der Kunde bspw. 123456 ein.
Dargestellt werden sollen aber nur die Tausender, also 123 in diesem Fall.
Gibt es eine Möglichkeit, das Feld mit einer Formatierung zu belegen, die genau dieses tut?
Sobald ich eine Formel eingebe, wird diese ja überschrieben mit der Zahl, die der Kunde einträgt.
Kann man vielleicht auch Formeln angeben, die "im Hintergrund" laufen und die Zelle formatieren?
Danke schonmal!
Matt
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Automatisch in Zelle Werte durch 1000 teilen
30.05.2005 12:48:08
Galenzo
Zellformat:
000.
Der Punkt am Ende ist wichtig!
(intern bleiben alle 6 Ziffern erhalten)
Viel Erfolg!
AW: Automatisch in Zelle Werte durch 1000 teilen
30.05.2005 12:52:03
Peter
Servus,
Kopiere den Code in die Tabelle wo das Ereignis stattfinden soll (mittels Alt+F11 in den VBA Editor wechseln, auf der linken Seite doppelklicken auf die Tabelle wo das ganze passieren soll, Code einfügen , Zeile ändern, Spass haben.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim a As String
'Zeile A1 (Bei z.B. B1 müsstest du bei Column 2 ändern, usw.
If Target.Column <> 1 And Target.Row <> 1 Then Exit Sub
a = Left(Target.Value, 3)
Target.Value = a
End Sub

MfG Peter
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Automatisch Werte in Excel durch 1000 teilen


Schritt-für-Schritt-Anleitung

Um in Excel alle Zahlen durch 1000 zu teilen und die Darstellung in Tausend zu ermöglichen, kannst du folgende Methoden verwenden:

  1. Zellen formatieren:

    • Markiere die Zellen, die du anpassen möchtest.
    • Klicke mit der rechten Maustaste und wähle Zellen formatieren.
    • Wähle Benutzerdefiniert und gebe den Formatcode 0, ein. Dies teilt die Werte in der Darstellung durch 1000.
  2. Formel verwenden:

    • Wenn du eine Formel benutzen möchtest, um die Werte zu teilen, kannst du in einer neuen Zelle folgende Formel eingeben:
      =A1 / 1000
    • Ersetze A1 durch die Zelle, die du teilen möchtest. Kopiere die Formel dann nach unten, um sie auf weitere Zellen anzuwenden.
  3. VBA-Makro:

    • Um die Werte automatisch in der gleichen Zelle zu teilen, kannst du ein VBA-Makro verwenden:
      • Drücke Alt + F11, um den VBA-Editor zu öffnen.
      • Doppelklicke auf die Tabelle, in der die Werte geändert werden sollen, und füge den folgenden Code ein:
        Private Sub Worksheet_Change(ByVal Target As Range)
        If Not Intersect(Target, Me.Columns(1)) Is Nothing Then
         Application.EnableEvents = False
         Target.Value = Target.Value / 1000
         Application.EnableEvents = True
        End If
        End Sub
      • Dieser Code teilt automatisch alle Werte in der ersten Spalte durch 1000.

Häufige Fehler und Lösungen

  • Fehler: Zellen zeigen die ursprünglichen Werte an

    • Lösung: Stelle sicher, dass die Zellen korrekt formatiert sind oder dass die Formel richtig eingegeben wurde.
  • Fehler: VBA-Makro funktioniert nicht

    • Lösung: Überprüfe, ob die Makros in Excel aktiviert sind. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center > Makroeinstellungen.

Alternative Methoden

  • Power Query: Du kannst auch Power Query verwenden, um Werte aus einer Excel-Tabelle zu importieren und sie dabei durch 1000 zu teilen. Dies ist besonders nützlich für große Datenmengen.

  • Pivot-Tabellen: Wenn du eine Pivot-Tabelle erstellst, kannst du die Werte dort ebenfalls auf Tausender formatieren, indem du die Werte in der Pivot-Tabelle entsprechend anpasst.


Praktische Beispiele

  1. Zahlen in Tausend darstellen:

    • Wenn du die Zahl 123456 in Zelle A1 hast, wird diese in der Zelle, die das Format 0, hat, als 123 angezeigt.
  2. Ganze Spalte durch 1000 teilen:

    • Wenn du eine ganze Spalte von Werten in Spalte A hast, kannst du die Formel in B1 (=A1/1000) eingeben und nach unten ziehen, um alle Werte zu teilen.

Tipps für Profis

  • Nutze die Funktion SVERWEIS oder WVERWEIS, um in Verbindung mit den geteilten Werten nach spezifischen Daten zu suchen.
  • Überlege, ob du die Werte dauerhaft ändern möchtest oder nur die Darstellung. Das VBA-Makro ändert die Werte in der Zelle, während die Formatierung nur die Anzeige ändert.

FAQ: Häufige Fragen

1. Wie kann ich alle Werte in einer Spalte durch 1000 teilen? Um alle Werte einer Spalte zu teilen, kannst du die Formel =A1/1000 in eine neue Spalte eingeben und sie dann nach unten kopieren.

2. Wie kann ich sicherstellen, dass die ursprünglichen Werte erhalten bleiben? Wenn du die Werte nur anzeigen, aber nicht ändern möchtest, nutze die Zellenformatierung 0, anstelle von Formeln oder VBA.

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