Страница: 1 |
Страница: 1 |
Вопрос: вставка xml в excel
Добавлено: 15.06.07 17:01
Автор вопроса: graff0man | ICQ: 391699023
У меня есть строка xml. Как мне её преобразовать чтобы было можно вставить её в excel в виде таблицы.
Ответы
Всего ответов: 7
Номер ответа: 1
Автор ответа:
HACKER
Разработчик Offline Client
Вопросов: 236
Ответов: 8362
Профиль | | #1
Добавлено: 16.06.07 00:00
xPath?
Номер ответа: 2
Автор ответа:
graff0man
ICQ: 391699023
Вопросов: 5
Ответов: 14
Профиль | | #2
Добавлено: 16.06.07 22:37
нет. есть некий програмный продукт для которого надо создать демонстрационный проект.так я получаю строку xml.
dim d as string
set s = Asm.GetXMLData() в скобках указываются параметры xml которые надо получить.
а вот как мне потом преобразовать её чтобы вставить в excel в виде таблицы я не знаю....
Номер ответа: 3
Автор ответа:
HACKER
Разработчик Offline Client
Вопросов: 236
Ответов: 8362
Профиль | | #3
Добавлено: 16.06.07 22:57
Есть механизм для разбора xml данных, он и называется xPath. Получившую xml строку распарсить с помощью xPath'a, и вставить данные в excel. Более автоматизированного способа я незнаю...
Номер ответа: 4
Автор ответа:
graff0man
ICQ: 391699023
Вопросов: 5
Ответов: 14
Профиль | | #4
Добавлено: 17.06.07 03:46
а как им пользоваться можно поподробнее написать? я впринципе и сам могу разобраться просто так наверно побыстрее будет..:о))) да и с vba я максимум 3 недели общаюсь...
Номер ответа: 5
Автор ответа:
HACKER
Разработчик Offline Client
Вопросов: 236
Ответов: 8362
Профиль | | #5
Добавлено: 17.06.07 20:50
В инете поискать готовый примерчик, помнится модуль какой-то был который обвязывает xPath в более удобные функции для использования...
Номер ответа: 6
Автор ответа:
graff0man
ICQ: 391699023
Вопросов: 5
Ответов: 14
Профиль | | #6
Добавлено: 18.06.07 00:20
пасиба за информацию! завтра с утра займусь поиском.
Номер ответа: 7
Автор ответа:
graff0man
ICQ: 391699023
Вопросов: 5
Ответов: 14
Профиль | | #7
Добавлено: 20.06.07 17:14
Короче все оказалось проще чем я думал...
Dim sOutXML As String
sOutXML = MainAssm.GetXMLData() Application.ActiveWorkbook.XmlImportXml sOutXML, Nothing, True, Range("$А$1"