JSON -Datum in ein MM/DD/JJJJ -Format konvertieren?

Question

Mein Kunde erhält eine Tabelle mit einer Reihe von Spalten, eines "Datums". Nur das Datum erfolgt als formatiert als Date(1292291582263-0700) (Ein JSON -Datum, wie es scheint).

Ich muss dieses JSON -Datum im MM/DD/JJJJ -Format, an anderer Stelle in diesem Tabelle (VBA), konvertieren und mit diesem JSON -Datum arbeiten.

Weiß jemand Ich habe viele Lösungen gelesen, sodass JavaScript, C#oder ASP.net usw. aber in JavaScript, C#oder ASP.net usw. sind Ich muss nur mit Excel 2010 und VBA -Code für dieses Projekt zusammenarbeiten. Gibt es eine Möglichkeit, ein lesbares Format zu erreichen, wie ich brauche?

Answer 1

Millisekunden-Epoche Zeit mit einem +/- Offset?

Const test = "1292291582263-0700"

Dim dt As String: dt = Left$(test, 13)
Dim off As String: off = Mid$(test, 14)

Dim d As Date: d = DateAdd("s", CCur(dt) / 1000, "01/01/1970")
Debug.Print d
<<< 14/12/2010 01:53:02 

d = DateAdd("h", Left$(off, 3), d)
d = DateAdd("n", Right$(off, 2), d)
Debug.Print d
<<< 13/12/2010 18:53:02