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

Verschiedene Datumsformate/zahlen vereinheitlichen

Forumthread: Verschiedene Datumsformate/zahlen vereinheitlichen

Verschiedene Datumsformate/zahlen vereinheitlichen
27.08.2019 18:16:11
Alex
Liebe Community,
ich würde mir gerne die Gründungsdaten von verschiedenen Unternehmen anschauen und hab dafür einen Auszug aus einer Datenbank heruntergeladen. Leider sind die Datumsformate nicht vereinheitlicht, was die Auswertung unmöglich macht. Ich hab es schon mit der JAHR, DATUM und TEXT Formel versucht, komm aber leider nicht weiter. Anscheinend reichen hierfür meine Fähigkeiten in Excel leider nicht aus.
Kann mir deshalb bitte jemand von euch weiterhelfen?
Ich hab die Daten auch nochmals als Excel-Datei hier hochgeladen:
https://www.herber.de/bbs/user/131657.xlsx
Vielen lieben Dank!
Liebe Grüße
Alex
Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Verschiedene Datumsformate/zahlen vereinheitlichen
27.08.2019 18:28:37
Sigi
Hallo Alex,
darf es VBA sein? Da ist's einfach:
Function JahrAusDiversem(Zelle As Range) As Long
JahrAusDiversem = CLng(Right(Zelle.Text, 4))
End Function
Grüße
Sigi
AW: Verschiedene Datumsformate/zahlen vereinheitlichen
27.08.2019 18:43:17
Sigi
Hallo Alex,
mit folgender Formel:
= WENN(ISTZAHL(A2); JAHR(A2); RECHTS(A2;4)) * 1
Grüße
Sigi
Anzeige
AW: Zeiten vor 1900
27.08.2019 18:57:03
Fennek
Hallo,
VBA kann Zeiten vor 1900 als negative Zahlen darstellen, das älteste Datum ist -2^7, also noch vor dem Mittelalter.
Excel stellt negative Zahlen nicht als Datum dar, aber mit "cells(i,j) = format(Datum, "yyyy") sollte es gehen.
mfg
(geprüft vor einigen Tagen)
Anzeige
Da ist ggf tatsächlich VBA gefragt, ...
27.08.2019 20:05:00
Luc:-?
…Alex,
denn dessen Datumsfkt reicht vom 1.1.100 bis zum 31.12.9999 und enthält auch nicht den Fehler 29.2.1900. Eine universelle Fml für das Jahr (als Zahl, wie von dir gewünscht) könnte mit 2 dafür gemachten UDFs folglich so aussehen:
=WENN(ISTZAHL(A2);JAHR(A2);WENNFEHLER(--A2;--LINKS(DateToText(TextToDate(A2));4)))
Leere Zellen erscheinen hier als 0 und solche mit sonstigem Text als #WERT!, aber das könnte man auch noch modifizieren.
ArchivLink zu den UDFs:
DateToText & TextToDate → https://www.herber.de/cgi-bin/callthread.pl?index=1538435#1540095
Gruß, Luc :-?
„Der beste Beweis für intelligentes Leben im Universum ist, dass noch niemand versucht hat, Kontakt mit uns aufzunehmen.“ H.Lesch, 2018, Sonneberg
Deshalb Intelligenz steigern mit …

Anzeige
ggf auch mein Lieblings-Tool ;-)
27.08.2019 20:52:51
Günther
Muster-Lösung auf Nachfrage -> per PM/E-Mail oder in meiner Cloud, da ich meine Ordner-Struktur nicht wegen eines Forums umstelle ... => https://my.hidrive.com/lnk/XvAmDleX
Gruß
Günther
den 29.02.1900 gibt's bei mir nicht
27.08.2019 21:18:54
WF
erst testen - dann kritisieren
nicht umgekehrt
Ich habe eure Lösung nicht kritisiert, ...
27.08.2019 23:05:15
Luc:-?
…Walter,
zumal ich ja auch direkt Alex geantwortet und ggf im Betreff zu stehen habe. Allerdings steht unter Deinem Link etwas von Tabellen-DownLoad und so etwas benötige ich nicht, da ich die erwähnte richtigere und potentere vbTageszählung als Grundlage verwende und auch kein Julianisches in ein Gregorianisches Datum umrechnen will. Das muss vorher geschehen und die fehlenden Tage wären dann irrelevant.
Gruß, Luc :-?
Anzeige
Allerdings scheint sich nach Test aller 6000 ...
28.08.2019 01:13:37
Luc:-?
…Daten eine einfachere Fml-Möglichkeit zu ergeben, die ohne UDFs auskommt:
=WENN(A2="";"";WENN(ISTZAHL(A2);JAHR(A2);WENNFEHLER(--RECHTS(A2;4);"")))
Diese setzt aber voraus, dass die Reihenfolge der Text-Datumsbestandteile immer {{TT/}MM/}JJJJ entsprechen und ein einzelnes Jahr ebenfalls als Text (nicht als echte Zahl!) vorliegt, wie das auch in der BspDatei der Fall ist. Das ist möglich, weil nur die Jahreszahl als Ergebnis verlangt wird.
Für ggf vollständige historische Datumsangaben (vor dem 1.3.1900) sind die beiden UDFs aber idR (und in ihrem Geltungsintervall) unverzichtbar, es sei denn, man wollte das excelformeln-Angebot oder PQ benutzen, wobei Letzteres höchstwahrscheinlich ebenfalls die vbDatumsdefinition nutzt.
Luc :-?
Anzeige
ohne Einschränkung ob Text oder Zahl
28.08.2019 10:21:05
WF
Hi,
=WENN(UND(ZELLE("format";A2)="D1";ISTZAHL(A2));JAHR(A2);RECHTS(A2;4))
WF
bzw. mit hinten ... RECHTS(0&A13;4)*1)
wenn das Ergebnis echte Zahlen sein sollen und Leerzellen dann nicht #WERT! ergeben
Wer vor 1.3.1900 400 J. addiert, kann ab 1583 ...
29.08.2019 17:02:00
lupo1
... alle Datümer korrekt darstellen/ermitteln. Nicht nur die Schalttage, sondern auch die Wochentage stimmen.
http://xxcl.de/0028.htm
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Excel Datumsformate vereinheitlichen


Schritt-für-Schritt-Anleitung

Um verschiedene Datumsformate in Excel zu vereinheitlichen, kannst du folgende Schritt-für-Schritt-Anleitung nutzen:

  1. Daten importieren: Lade deine Excel-Datei mit den unterschiedlichen Datumsformaten in Excel.
  2. Neue Spalte erstellen: Füge neben deiner Datums-Spalte eine neue Spalte ein, in die du die vereinheitlichten Daten schreiben wirst.
  3. Formel anwenden: Nutze die folgende Formel, um die verschiedenen Datumsformate zu vereinheitlichen:
    =WENN(ISTZAHL(A2); JAHR(A2); RECHTS(A2; 4))

    Diese Formel prüft, ob der Inhalt in Zelle A2 eine Zahl ist und extrahiert das Jahr entsprechend.

  4. Nach unten ziehen: Ziehe die Ecke der Zelle mit der Formel nach unten, um sie auf die anderen Zellen anzuwenden.
  5. Formatieren: Formatiere die neue Spalte nach Bedarf, um die Daten optimal darzustellen.

Häufige Fehler und Lösungen

  • Fehler: #WERT!
    Lösung: Stelle sicher, dass die Daten in der Zelle im korrekten Datumsformat vorliegen. Nutze die Funktion TEXT oder DATUM, um sicherzustellen, dass die Eingaben als Datum erkannt werden.

  • Fehler: Falsche Jahreszahl
    Lösung: Überprüfe, ob die ursprünglichen Datumsangaben konsistent sind. Wenn du Texteingaben hast, könnte die Formel =WENNFEHLER(--RECHTS(A2;4);"") helfen.


Alternative Methoden

Falls du VBA verwenden möchtest, kannst du eine benutzerdefinierte Funktion erstellen:

Function JahrAusDiversem(Zelle As Range) As Long
    JahrAusDiversem = CLng(Right(Zelle.Text, 4))
End Function

Diese Funktion extrahiert das Jahr aus verschiedenen Datumsformaten und kann mit der Formel =JahrAusDiversem(A2) in einer Zelle verwendet werden.


Praktische Beispiele

Hier sind einige Beispiele, wie du verschiedene Datumsformate vereinheitlichen kannst:

  • Beispiel 1: Wenn du ein Datum im Format MM/TT/JJJJ hast, kannst du die Formel =DATUM(RECHTS(A2;4);LINKS(A2;2);TEIL(A2;4;2)) verwenden, um es in ein standardisiertes Format zu bringen.

  • Beispiel 2: Für Texteingaben wie 31.12.2020 kannst du =DATUM(RECHTS(A2;4);TEIL(A2;4;2);LINKS(A2;2)) verwenden.


Tipps für Profis

  • Verwende die Funktion TEXT: Wenn du eine spezifische Formatierung benötigst, nutze die TEXT-Funktion, um das Datum in ein gewünschtes Format zu bringen:

    =TEXT(A2;"TT.MM.JJJJ")
  • Datenüberprüfung: Überprüfe immer deine Daten nach der Anwendung von Formeln, um sicherzustellen, dass die Ergebnisse korrekt sind.

  • VBA für komplexe Anforderungen: Bei besonders komplexen Datumsformaten kann es sinnvoll sein, VBA zu verwenden, um die Daten effizienter zu verarbeiten.


FAQ: Häufige Fragen

1. Warum werden meine Datumsformate nicht korrekt angezeigt?
Dies kann daran liegen, dass Excel die Daten nicht als Datumswerte erkennt. Stelle sicher, dass die Eingaben im richtigen Format vorliegen.

2. Kann ich mehrere verschiedene Datumsformate in einer Zelle haben?
Excel erkennt in der Regel nur ein Datumsformat pro Zelle. Um verschiedene Formate zu kombinieren, solltest du die Daten in separate Zellen aufteilen.

3. Welche Excel-Version benötige ich für diese Methoden?
Die beschriebenen Methoden sind in den meisten modernen Excel-Versionen (Excel 2010 und höher) anwendbar.

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