Excel 2010 - ändern Sie UNS Termine zu UK-format

Das problem ist, dass UNS das Datum können analysiert von Excel als UK-Termin, wenn der Tag kleiner als 13 ist. Wenn dies geschieht, konvertiert Excel es auf die lokalisierte UK-Seriennummer (Datum) Anzahl.

So 03/19/2014 ist offensichtlich ein US-Datum der 19. März. Allerdings 05/03/2014 mehrdeutig ist, so dass Excel analysiert Sie das lokale Datum-format, wie den 5. März statt, die UNS zum 3. Mai. Jede Formel ist zu überprüfen, ob Excel gespeichert hat, die UNS Datum als UK Datum. Eine UK-Datum gespeichert werden in Excel als Zahl.

=IF(ISNUMBER(A2),DATE(TEXT(A2,"yyyy"),TEXT(A2,"dd"),TEXT(A2,"mm")),DATE(RIGHT(A2,4),LEFT(A2,FIND("/",A2)-1),MID(A2,FIND("/",A2)+1,2)))

(Für UNS ein Datum, in Zelle A2-und PC-Datum TT/mm/JJ).

Wenn ISNUMBER ist wahr, die UNS das Datum sieht aus wie ein UK Datum und Excel hat serialisiert wird es als eine Zahl. So kann format das Datum als text und wieder zu einem Zeitpunkt wieder. Hinweis: Tag ist vergangen, der month-parameter auf der ersten DATE-Funktion, um die Konvertierung durchzuführen.
Wenn ISNUMBER falsch ist, seine als string gespeichert als Excel konvertieren nicht eine Datums-Zeichenfolge mit >12 Monate. Also die Verwendung von string-Funktionen, um es zu teilen für die DATUM-Funktion.

InformationsquelleAutor user3155533

Ich habe versucht, einige der anderen Vorschläge, aber keiner schien für mich arbeiten. In meinem Fall war ich importieren UNS Datumsangaben in der form M/d/yyyy hh:mm:ss. Wenn es Ihnen nichts ausmacht mit VBA in Tabellenblatt dann die folgende Funktion hat den job für mich:

Public Function USDate(ds As Variant) As Variant
    Dim sp() As String
    Dim spt() As String
    Dim spt2() As String

    If ds = vbNullString Then
        USDate = ""
    ElseIf IsNumeric(ds) Then 
        ' Convert numeric US dates wrongly interpreted as UK i.e. 1/7/2017 as 7th January 2017
        USDate = DateSerial(Year(ds), Day(ds), Month(ds)) 
    Else
        sp = Split(ds, "/") ' split the date portion
        spt = Split(sp(2), " ") ' split the time from the year
        spt2 = Split(spt(1), ":") 'split the time hms

        USDate = DateSerial(spt(0), sp(0), sp(1)) + TimeSerial(spt2(0), spt2(1), spt2(2))
    End If
End Function

Danke für https://stackoverflow.com/users/845584/peterx hingewiesen - müssen Sie die Funktion in einem VBA-code-Modul, um diese Technik zu nutzen.

Einfach in einer Tabellenkalkulation-Formeln z.B. =USDate(A2)

InformationsquelleAutor user2486488

Wir bekommen können das beste beider Welt-mit diesem prägnanten Formel:

=IF(ISNUMBER(A2),VALUE(TEXT(A2,"mm/dd/yyyy")),DATE(RIGHT(A2,4),LEFT(A2,FIND("/",A2)-1),MID(A2,FIND("/",A2)+1,2)))

Nicht finden können, etwas kürzer.

InformationsquelleAutor Boulebill

Dies kann schwierig sein, wenn sich die Termine im gemischten format zB. In Großbritannien und den USA in der gleichen Spalte. Ich habe eine effektive, wenn unelegant Lösung:

Step1) Select the column containing the dates to be converted;

Step2) Format, Cells, Text;

Step3) Format, Cells, Date, US;

Step4) Data, Text to column, Next, Delimited, Next, delete all delimiters, Next, select format MDY;

Step5) Format, Cells, Date, UK.

Step4 war vorgeschlagen worden, die anderswo, aber das alleine trifft es nicht tun für mich. Ich hoffe, vereinen diese Schritte in einem makro, aber kein Erfolg, so weit.

InformationsquelleAutor maren