ActiveCell.PasteSpecial xlPasteValues

[Andyle]

Hallo an alle!

Ich nutze folgenden Code um die Zwischenablage einzufügen:

ActiveCell.PasteSpecial xlPasteValues

In Spalte A und M sind Datum

Gibt es eine Möglichkeit diese Zellen in Spalte A und M ales Datumsformat zu deklarieren beim einfügen?
Jetzt fügt er ja nur alles als Werte ein.

Danke für Eure Unterstützung

[UweD]

Hallo

füge das zusätzlich ein...

Code:

   Range("A:A,M:M").NumberFormat = "dd.mm.yyyy"

LG UweD

[Luschi]

Hallo

oder mach es so:

Code:

With ActiveCell
    .PasteSpecial xlPasteValues
    .PasteSpecial xlPasteFormats
End With

Gruß von Luschi
aus klein-Paris

[Kuwer]

... oder

.PasteSpecial Paste:=xlPasteValuesAndNumberFormats

Gruß, Uwe

[Andyle]

Vielen Dank für Eure Hilfe! Funzt bestens!