Zaimportuj dane Json do Excela

8

Mam plik tekstowy w formacie json i chcę go przeczytać w programie Excel. Bardzo uproszczony przykład pliku json ma następującą strukturę:

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

Chcę przekonwertować go do programu Excel, w którym każdy rekord staje się wierszem excel z wybranymi parametrami jako nagłówkami kolumn.

microsoft-excel vba parsing json Ricardo Marimon
źródło
2
Przepraszam za moją ignorancję; które z powyższych wartości to „rekordy”, a które „wybrane parametry”?
jrc03c
Rekord miałby postać {a a: 10, „b”: 20}, a parametrami byłyby „a” i „b”.
Ricardo Marimon
2
To może uzyskać lepszą odpowiedź na stackoverflow.com
Daisetsu,

Odpowiedzi:

5

Możesz to zrobić w VBA z vba-json biblioteką . Oto przykład kodu, który skopiowałem :

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
Lance Roberts
źródło
Nie jest to już świetna odpowiedź bez konieczności pobrania kodu Google
Peter Turner,
1

Oto kilka przykładowych plików do pobrania w programie Excel z możliwościami konwersji programu json excel. Możesz to zrobić bezpośrednio z poziomu programu Excel.

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

Bruce
źródło
1

  1. Wklej JSON do json-csv.com .

  2. Pobierz wynikowy plik CSV.

  3. Otwórz plik CSV w programie Excel.

Stack Man
źródło