Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1736to1740
1736to1740
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Datum im richtigen Format kopieren

Forumthread: Datum im richtigen Format kopieren

Datum im richtigen Format kopieren
29.01.2020 10:31:45
Sonja
Hallo zusammen,
ich habe 2 Tabellen mit Werten. Durch Ausführen des Markos werden durch das Stichwort "neu" in Spalte E, die Spalten A bis D in die nächsten freien Zeilen von der anderen Tabelle, selbe Spalten, kopiert.
Funktioniert alles ganz gut.
Wo ich nicht weiter komme ist: In Spalte A wird das Datum über =heute() generiert.
Wenn ich mit "values" arbeite, wandelt es das Datum in ein Zahlenformat.
Kann mir da einer helfen?

Sub kopieren()
Dim lngI As Long
With Worksheets("Zwischenspeicher")
For lngI = 2 To .Range("A65536").End(xlUp).Row
If .Cells(lngI, 5).Value = "neu" Then
With Worksheets("Kundenliste Akquise")
Rows(lngI).Columns("A:D").Copy .Cells(.Range("A65536").End(xlUp).Row + 1, 1)
End With
End If
Next lngI
End With
End Sub

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datum im richtigen Format kopieren
29.01.2020 10:47:11
Daniel
Hi
ist ja auch korrekt.
ein Datum ist in Excel eine fortlaufende Ganzzahl. Die Zählung beginnt am 1.1.1900 mit 1 und wird jeden Tag um 1 erhöht.
der Anschein des Datums entsteht nur durch das spezielle Zahlenformat, welches Excel automatisch vergibt, wenn es ein Datum bei der Eingabe oder in der Formel erkennt.
wenn du mit .Value kopierst, überträgst du natürlich nur die Werte, aber nicht die Formate, darum erscheint dann anstelle des Datums der dem Datum entsprechende Zahlenwert.
es gibt zwei Möglichkeiten:
a) du formatierst in der Zieltabelle die Spalte A von Hand mit einem Datums-Zahlenformat.
b) du kopierst nicht nur die Werte, sondern die Werte zusammen mit den Zahlenformaten (.PasteSpecial xlpasteValuesAndNumberformats)
c) du fügst zuerst die Werte (.PasteSpecial xlpastevalues) und dann nochmal die Formate ein (.PasteSpecial xlpasteformat)
Gruß Daniel
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Datum im richtigen Format kopieren

Schritt-für-Schritt-Anleitung

Um ein Datum in Excel korrekt zu kopieren, ohne dass es in ein Zahlenformat umgewandelt wird, kannst du folgende Schritte ausführen:

  1. Öffne deine Excel-Datei und gehe zu der Tabelle, aus der du das Datum kopieren möchtest.
  2. Markiere die Zellen mit den Datumswerten, die du kopieren möchtest.
  3. Kopiere die Zellen (Rechtsklick -> Kopieren oder Strg + C).
  4. Wechsle zur Zieltabelle, wo du die Daten einfügen möchtest.
  5. Klicke mit der rechten Maustaste auf die Zelle, wo die Daten eingefügt werden sollen.
  6. Wähle „Inhalte einfügen“ und dann „Werte“ aus.
  7. Um die Formatierung beizubehalten, kannst du die Spalte A in der Zieltabelle manuell auf ein Datumsformat einstellen oder den folgenden VBA-Code verwenden:
Sub kopieren()
    Dim lngI As Long
    With Worksheets("Zwischenspeicher")
        For lngI = 2 To .Range("A65536").End(xlUp).Row
            If .Cells(lngI, 5).Value = "neu" Then
                With Worksheets("Kundenliste Akquise")
                    Rows(lngI).Columns("A:D").Copy
                    .Cells(.Range("A65536").End(xlUp).Row + 1, 1).PasteSpecial xlPasteValuesAndNumberFormats
                End With
            End If
        Next lngI
    End With
End Sub

Häufige Fehler und Lösungen

  1. Problem: Falsches Jahr
    Wenn das kopierte Datum in der Zieltabelle ein falsches Jahr anzeigt, stelle sicher, dass das ursprüngliche Datum korrekt formatiert ist. Überprüfe auch die Datumseinstellungen deines Systems.

  2. Problem: Datum wird als Zahl angezeigt
    Dies passiert, wenn du nur die Werte kopierst. Verwende .PasteSpecial xlPasteValuesAndNumberFormats, um sowohl Werte als auch Formate zu übertragen.

  3. Problem: Excel Datum kopieren und als Text einfügen
    Wenn du ein Datum als Text einfügen möchtest, verwende die Funktion TEXT, um das Datum in das gewünschte Format zu bringen, bevor du es kopierst.

Alternative Methoden

  • Direktes Einfügen: Du kannst auch die Funktion „Einfügen“ in der Menüleiste verwenden. Wähle „Einfügen“ und dann „Werte“ aus.
  • Format übertragen: Wenn du das Datum kopiert hast, kannst du das Format der Zielzelle mit dem Format-Pinsel übertragen.
  • Excel-Datenbank: Verwende die Funktion „Daten abrufen“, um Daten aus einer anderen Tabelle einzufügen, ohne die Formate zu verlieren.

Praktische Beispiele

  1. Beispiel 1: Du hast eine Liste von Bestelldaten in Spalte A und möchtest nur die Bestelldaten in eine andere Tabelle kopieren, ohne das Format zu verlieren.

  2. Beispiel 2: Wenn du eine Tabelle mit Datumsangaben hast, die aus verschiedenen Quellen stammen, und du sicherstellen möchtest, dass sie alle im gleichen Format angezeigt werden. Nutze die Funktion =TEXT(A1, "TT.MM.JJJJ"), um das Datum in ein einheitliches Format zu bringen.

Tipps für Profis

  • Nutze Tastenkombinationen: Lerne die Tastenkombinationen für das Kopieren und Einfügen, um schneller zu arbeiten.
  • VBA-Skripte: Investiere Zeit in das Erlernen von VBA, um Automatisierungen zu erstellen, die dir helfen, Daten effizient zu verwalten.
  • Datumsformate: Stelle sicher, dass deine Excel-Installation auf die richtige Region eingestellt ist, um Probleme mit Datumsformaten zu vermeiden.

FAQ: Häufige Fragen

1. Wie kann ich ein Datum in Excel kopieren, ohne es in eine Zahl umzuwandeln?
Verwende die Funktion .PasteSpecial xlPasteValuesAndNumberFormats, um sowohl die Werte als auch die Formate zu übertragen.

2. Was mache ich, wenn Excel das falsche Jahr anzeigt?
Überprüfe die ursprünglichen Datumswerte auf Richtigkeit. Stelle sicher, dass deine Systemeinstellungen für Datum und Uhrzeit korrekt sind.

3. Wie füge ich ein Datum als Text ein?
Nutze die Funktion TEXT, um das Datum in ein Textformat zu bringen, bevor du es kopierst.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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