Wie bekomme ich Wert von Textdatei von Excel VBA? - Excel, VBA, Text

Ich habe eine Textdatei mit Informationen wie

{"status": 200, "source_coordinates": [[52.55407,13.160621]], "destination_coordinates": [[52.431237,13.720644], [52.55409,13.720557], [52.55407,13.160621]], "distance_table": [[31574 , 30971,0]]}

und ich hätte gerne einen Tisch mit

columns status, source, destination, distance_table and theirs values.

Danke für die Hilfe

Antworten:

1 für die Antwort № 1
Open file For Input As #1
Text = ""
Do Until EOF(1)
Line Input #1, textline
Text = Text & textline
Loop

Close #1

Damit haben Sie alle Daten in der Variablen "text". Jetzt können Sie die Daten mit InStr in die entsprechenden Spalten füllen.


Verwandte Fragen
Speisekarte