Я использую библиотеку для преобразования данных из таблицы Excel в json.когда я печатаю его в консоли или в значении ячейки Excel, я вижу именно данные, отформатированные в формате json, но когда я сохраняю их в некоторый текстовый файл.Я вижу добавленные дополнительные кавычки.
Мой код для сохранения Json в файл
Dim myFile As String
myFile = "C:\Users\test\Desktop\data.json"
Open myFile For Output As #1
Write #1, Range("A10").Value ' Or json (containing data)
Close #1
Сначала я преобразовываю ячейки из A1 в F6 в массив объектов json.который находится в формате:
правильная версия
[
{"key1": "val1", "key2": "val2", "key3": "val3", "key4": "val4"},
{"key11": "val11", "key12": "val12", "key13": "val13", "key14": "val14"},
{"key21": "val21", "key22": "val22", "key23": "val23", "key24": "val24"}
]
, затем я сохраняю его в файл data.json.Но я получаю это в файле.
неправильная версия
"[
{""key1"":""val1"",""key2"":""val2"",""key3"":""val3"",""key4"":""val4"",""key5"":""val5""}
{""key21"":""val21"",""key22"":""val22"",""key23"":""val23"",""key24"":""val24"",""key25"":""val25""}
]"
Когда я печатаю те же данные JSON на консоль (Immediate Window) в VBA или в любой из клеток Excel , я вижу правильную версию.
Я не понимаю, где я иду не так?
это библиотека, которую я использую, и она дает тот же результат:
Тим Холл - https://github.com/VBA-tools/VBA-JSON Я также создал свой собственный конвертер json, но получаю тот же результат.