Datoer

Hej,

Står med et godt problem.

Jeg har nogen csv filer jeg laver noget data bearbejdning på og her efter kopier over i et andet sheet.

Problemet opstår når jeg kopier over til det andet sheet at Excel (2007) får lyst til at ændre på formattet for de første 12 dage i måneden så den læser m/d-yyyy mens resten af data sættet bliver læst som d/m-yyyy. Før jeg kopier så har den forstået datoerne rigtigt.

Jeg har prøvet at kopier som rå text unden unikode, sætte formattering til d/m-yyyy før flytning, men uden held.

Så nu søger jeg gode forslag til at håndtere dette problem

min kopi kode ser pt således ud.


Sub copytosheet1()
Cells.CurrentRegion.Select 'vælger data sættet
Application.CutCopyMode = False
Selection.Copy
ActiveWorkbook.Close False
ThisWorkbook.Activate
Sheets(4).Select
Range("a65000").Select
Selection.End(xlUp).Select
Selection.Offset(1, 0).Select ' vælger næste fri linje
ActiveSheet.PasteSpecial Format:="Text", Link:=False, DisplayAsIcon:= _
        False