Importieren Sie Json-Daten in Excel

49481
Ricardo Marimon

Ich habe eine Textdatei im Json-Format und möchte sie in Excel einlesen. Ein sehr vereinfachtes Beispiel für die Json-Datei hat die folgende Struktur:

{ [ { 'a': 10, 'b': 20 }, { 'a': 20, 'b': 22 }, { 'a': 11, 'b': 24 } ] } 

Ich möchte es nach Excel konvertieren, in dem jeder Datensatz zu einer Excel-Zeile mit den ausgewählten Parametern als Spaltenüberschriften wird.

8
Verzeihen Sie meine Unwissenheit. Welche der obigen Werte sind die "Datensätze" und welche sind die "ausgewählten Parameter"? jrc03c vor 14 Jahren 2
Ein Datensatz wäre {'a': 10, 'b': 20} und die Parameter wären 'a' und 'b'. Ricardo Marimon vor 14 Jahren 0
Dies kann eine bessere Antwort auf stackoverflow.com erhalten Daisetsu vor 14 Jahren 2

3 Antworten auf die Frage

5
Lance Roberts

Sie können dies in VBA mit der vba-json Bibliothek tun . Hier ist ein Beispiel für einen Code, den ich kopiert habe :

Sub TestJsonDecode() 'This works, uses vba-json library  Dim lib As New JSONLib 'Instantiate JSON class object  Dim jsonParsedObj As Object 'Not needed   jsonString = "{'key1':'val1','key2':'val2'}"  Set jsonParsedObj = lib.parse(CStr(jsonString))   For Each keyName In jsonParsedObj.keys  MsgBox "Keyname=" & keyName & "//Value=" & jsonParsedObj(keyName)  Next   Set jsonParsedObj = Nothing  Set lib = Nothing  End Sub   Sub TestJsonEncode() 'This works, uses vba-json library  Dim lib As New JSONLib 'Instantiate JSON class object  Set arr = CreateObject("Scripting.Dictionary")   arr("key1") = "val1"  arr("key2") = "val2"   MsgBox lib.toString(arr)  End Sub  
Keine großartige Antwort mehr ohne Google-Code zum Download Peter Turner vor 7 Jahren 0
1
Bruce

Hier einige Beispiele für Excel-Downloads mit json Excel Conversion-Funktionen. Sie können es direkt aus Excel heraus tun.

http://ramblings.mcpher.com/Home/excelquirks/json

1
Stack Man
  1. Fügen Sie die JSON in json-csv.com ein .

  2. Laden Sie die resultierende CSV-Datei herunter.

  3. Öffnen Sie die CSV-Datei in Excel.