Что нового

[Автоматизация] Нужна помощь при переводе таблици из IE в Excel

Trans

Знающий
Сообщения
257
Репутация
6
В название темы, написана вся суть проблемы:smile:
Есть такой вариант с библиотекой Array.au3
Код:
#include <IE.au3>
#include <Array.au3>
$oIE = _IECreate ('http://my_site.ru')
$oTable = _IETableGetCollection ($oIE, 2)
$aTableData = _IETableWriteToArray ($oTable, True)
_ArrayDisplay($aTableData)

но надо чтоб таблицу сразу помещал в Excel...
 

Olorin

Новичок
Сообщения
28
Репутация
0
Чем не устраивает функция _ExcelWriteArray ?
 

axlwor

Скриптер
Сообщения
657
Репутация
147
Если таблица такая простая. То ие+excel сами разберутся без autoit
 
Автор
T

Trans

Знающий
Сообщения
257
Репутация
6
Получилось, что-то типо такого, но почему-то таблица не забивается в Excel
Код:
#include <Excel.au3>
#include <IE.au3>

$oIE = _IECreate ('http://My_Site.ru')
_IELoadWait($oIE)
$oTable = _IETableGetCollection ($oIE, 2)
Local $oExcel = _ExcelBookNew() ; Создаем новую рабочую книгу
$aTableData = _IETableWriteToArray ($oTable, True)


_ExcelWriteArray($oExcel, 1, 1, $aTableData, 1) ; Записываем содержимое массива в ячейки листа - в горизонтальном направлении(вправо)

_ExcelBookSaveAs($oExcel, "Temp.xls", "xls", 0, 1) ; Сохраняем файл в директории временных файлов, перезаписывая если необходимо.
 

axlwor

Скриптер
Сообщения
657
Репутация
147
Код:
#include <Excel.au3>
#include <IE.au3>
$oIE = _IECreate ('http://news.yandex.ru/quotes/1.html')
$oTable = _IETableGetCollection ($oIE, 8)
$aTableData = _IETableWriteToArray ($oTable, True)
$oExcel = _ExcelBookNew() ; Создаем новую рабочую книгу
_ExcelWriteSheetFromArray ($oExcel, $aTableData, 1,1,0,0)
_ExcelBookSaveAs($oExcel, @ScriptDir & "\~~~Temp.xls", "xls", 0, 1) ; Сохраняем файл в директории временных файлов, перезаписывая если необходимо.
 

rais

Новичок
Сообщения
3
Репутация
0
axlwor сказал(а):
Код:
#include <Excel.au3>
#include <IE.au3>
$oIE = _IECreate ('http://news.yandex.ru/quotes/1.html')
$oTable = _IETableGetCollection ($oIE, 8)
$aTableData = _IETableWriteToArray ($oTable, True)
$oExcel = _ExcelBookNew() ; Создаем новую рабочую книгу
_ExcelWriteSheetFromArray ($oExcel, $aTableData, 1,1,0,0)
_ExcelBookSaveAs($oExcel, @ScriptDir & "\~~~Temp.xls", "xls", 0, 1) ; Сохраняем файл в директории временных файлов, перезаписывая если необходимо.
Почему-то у меня этот скрипт не работает.
 

Вложения

  • Untitled.png
    Untitled.png
    20.6 КБ · Просмотры: 3

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
rais,
В версии AutoIt 3.3.12.0 все функции в <Excel.au3> переименованы и переписаны. См. оригинальную англ. справку к версии AutoIt 3.3.12.0/
 
Верх