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

Datum wird als Zahl kopiert

Forumthread: Datum wird als Zahl kopiert

Datum wird als Zahl kopiert
12.09.2008 13:09:04
Horst
Hey !
ich will eine Spalte mit Datumswerten in ein neues Tabellenblatt per Makro kopieren mit das ganze in einer Schleife.
Nur wenn ich mir das kopierte auf dem Tabellenblatt anschaue, stehen da die Nummerische Werte der Daten
also 39703 satt 12.09.2008
Wie kann ich das verhindern?
-----------------------------
zeilenint = 1
For A To ....
Tabelle1.Cells(A, eineZelle.Column).Copy
Tabelle2.Cells(zeilenint, spalteint).PasteSpecial
Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False
zeilenint = zeilenint + 1
Next A
-----------------------
Gruß
Horst
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datum wird als Zahl kopiert
12.09.2008 13:23:00
Tobias
Hallo Horst!
Ändere die Formatierung der Zellen. Geht auch mit dem Recorder.
Oder kopiere ebenfalls die Formatierung:


    Range("E9:E12").Copy
    Range("F9:F12").PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False


Gruß, Tobi
http://vba-blog.de/
Anzeige
AW: Datum wird als Zahl kopiert
12.09.2008 13:23:58
Vera
Hallo Horst,
Du musst die kopierten Zellen noch als Datum formatieren.
Entweder vorher im Blatt oder mittels VBA:
Selection.NumberFormat = "mm.dd.yyyy"
Liebe Grüße
Vera
AW: Datum wird als Zahl kopiert
12.09.2008 13:25:09
Henner
Hi Horst,
formatiere die Zelle in deinem Code nach dem Einfügen mit:
Selection.NumberFormat = "m/d/yyyy"
Gruß Henner
Anzeige
AW: Datum wird als Zahl kopiert
12.09.2008 13:31:41
Daniel
HI
du musst auch das Zahlenformat mitkopieren, dh.
anstelle von "Paste:=xlPasteValues" nimmst du "Paste:=xlPasteValuesAndNumberFormats"
allerdings gibts diese Option in älteren Excelversionen nicht, da musst du dann Wert und Format einzeln einfügen (als 2x ein PasteSpecial hintereinander ausführen, einmal für Werte und einmal für das Format)
allerdings ist die Schleife überflüssig, du kannst die Zellen auf einmal kopieren:
Tabelle1.Range("A1:A100").copy
Tabelle2.Range("A1").Pastespecial Paste:=xlPasteValues
funktioniert auch.
Gruß, Daniel
Anzeige
AW: Datum wird als Zahl kopiert
12.09.2008 13:44:38
Horst
Danke allen zusammen ihr habt mich auf die Idee gebracht
mit
Paste:=xlPasteValuesAndNumberFormats
statt mit
Paste:=xlPasteValues
Gruß
Horst
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Datum korrekt in Excel kopieren


Schritt-für-Schritt-Anleitung

Um Datumswerte in Excel korrekt zu kopieren, kannst du die folgenden Schritte befolgen:

  1. Zellen auswählen: Wähle die Zellen aus, die du kopieren möchtest.

  2. Formatierung überprüfen: Stelle sicher, dass die Zellen im richtigen Datumsformat formatiert sind.

  3. Kopieren mit VBA: Verwende ein Makro, um die Daten zu kopieren. Hier ist ein einfaches Beispiel:

    zeilenint = 1
    For A = 1 To 100 ' Passe die Anzahl der Zeilen an
       Tabelle1.Cells(A, 1).Copy
       Tabelle2.Cells(zeilenint, 1).PasteSpecial Paste:=xlPasteValuesAndNumberFormats
       zeilenint = zeilenint + 1
    Next A
  4. Zellen formatieren: Wenn du nur die Werte kopierst, formatiere die Zielzellen anschließend als Datum:

    Tabelle2.Columns(1).NumberFormat = "mm.dd.yyyy"

Häufige Fehler und Lösungen

  • Excel Datum ändert sich beim Kopieren: Dies passiert oft, wenn du nur die Werte ohne das dazugehörige Format kopierst. Stelle sicher, dass du sowohl die Werte als auch das Zahlenformat mit Paste:=xlPasteValuesAndNumberFormats kopierst.

  • Excel Datum kopieren verändert: Wenn das Jahr falsch dargestellt wird, könnte es am regionalen Datumsformat liegen. Überprüfe die Spracheinstellungen von Excel oder formatiere das Datum manuell.

  • Excel Zahl in Datum: Wenn du siehst, dass das Datum als Zahl angezeigt wird (z.B. 39703 statt 12.09.2008), liegt es daran, dass die Zielzelle nicht als Datum formatiert ist. Verwende die oben genannten Formatierungsschritte.


Alternative Methoden

Falls du kein VBA verwenden möchtest, kannst du auch folgende Methoden ausprobieren:

  • Kopieren und Einfügen: Kopiere die Zellen und füge sie mit „Einfügen“ -> „Inhalte einfügen“ -> „Werte“ und „Formatierungen“ ein.
  • Formatierungsoptionen: Verwende die Formatierung über die Excel-Oberfläche. Wähle die Zielzelle aus und gehe zu „Start“ -> „Zahlenformat“ und wähle das gewünschte Datumsformat.

Praktische Beispiele

Hier sind einige praktische Beispiele, um zu verdeutlichen, wie du Datumswerte korrekt in Excel kopieren kannst:

  1. Einzelne Zelle kopieren:

    Tabelle1.Range("A1").Copy
    Tabelle2.Range("A1").PasteSpecial Paste:=xlPasteValuesAndNumberFormats
  2. Bereich kopieren:

    Tabelle1.Range("A1:A10").Copy
    Tabelle2.Range("B1").PasteSpecial Paste:=xlPasteValuesAndNumberFormats
  3. Formatierung nach dem Kopieren:

    Tabelle2.Range("B1:B10").NumberFormat = "m/d/yyyy"

Tipps für Profis

  • Makros verwenden: Überlege dir, ob du ein Makro aufzeichnen möchtest, um den Prozess zu automatisieren.
  • Datenüberprüfung: Führe eine Datenüberprüfung durch, um sicherzustellen, dass die kopierten Daten das richtige Format haben.
  • Formatvorlagen: Nutze Excel-Formatvorlagen, um die Formatierung deiner Daten zu standardisieren.

FAQ: Häufige Fragen

1. Warum wird mein Datum als Zahl angezeigt?
Das liegt daran, dass die Zelle nicht als Datum formatiert ist. Stelle sicher, dass du das richtige Zahlenformat verwendest.

2. Wie kann ich das Datumsformat beim Kopieren anpassen?
Du kannst das Datumsformat in VBA mit Selection.NumberFormat = "mm.dd.yyyy" oder über die Excel-Oberfläche unter „Start“ -> „Zahlenformat“ ändern.

3. Gibt es eine Möglichkeit, Datumswerte ohne VBA zu kopieren?
Ja, du kannst die Werte einfach kopieren und dann über „Einfügen“ -> „Inhalte einfügen“ die Werte und Formatierungen auswählen.

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