Доброго времени суток уважаемые форумчане! Возник вопрос по написанию скрипта!
Сразу прошу не "пинать" ибо с написанием скриптов столкнулся только сейчас!
Суть пролемы: Есть таблица Excel в которую заношу значения в определенные ячейки по строкам вида A2-1111 | B2-2222 | C2-3333 D2-4444 | E2-нужно вставить данные. И есть специализированная программа - в окне которой вводяться значения в определенные поля и нажимаються кнопочки - предусмотрен тока ручной ввод :(. Надоело вводить все в ручную - вот и решил написать скрипт для чего и подготовил файл Excel.
вот текст скрипта:
Скрипт отрабатвает нормально до предполседнего действия .
Вопрос - как записать в закрытый файл Excel значение - скопированное в буфер обмена. Через буфер по тому - что по другому значение получить не получаеться.
И сразу второй вопрос - как сделать цикл.
Заранее спасибо за ответы!
Сразу прошу не "пинать" ибо с написанием скриптов столкнулся только сейчас!
Суть пролемы: Есть таблица Excel в которую заношу значения в определенные ячейки по строкам вида A2-1111 | B2-2222 | C2-3333 D2-4444 | E2-нужно вставить данные. И есть специализированная программа - в окне которой вводяться значения в определенные поля и нажимаються кнопочки - предусмотрен тока ручной ввод :(. Надоело вводить все в ручную - вот и решил написать скрипт для чего и подготовил файл Excel.
вот текст скрипта:
Код:
#include <Excel.au3>
$oExcel = ObjGet("c:\Skripti\PriemSopr.xls", "Excel.Application")
$sReadCell = _ExcelReadCell($oExcel, "A2" )
_WinWaitActivate("Прием ########ти","")
ControlClick ("", "", "[CLASSNN:TEXTEDIT31]", "left", 1, 1, 1)
Send("{Delete 8}")
Send($sReadCell,1)
$sReadCell = _ExcelReadCell($oExcel, "C2" )
ControlClick ("", "", "[CLASSNN:TEXTEDIT32]", "left", 1, 1, 1)
Send("{Delete 8}")
Send($sReadCell,1)
ControlClick ("Прием ########ти", "Поиск", "[CLASSNN:OSBUTTON5]", "left", 2, 1, 1)
sleep(10000)
$sReadCell = _ExcelReadCell($oExcel, "D2" )
ControlClick ("", "", "[CLASSNN:TEXTEDIT34]", "left", 1, 1, 1)
Send($sReadCell,1)
ControlClick ("Прием ########ти", "Прием вед####", "[CLASSNN:OSBUTTON5]", "left", 2, 1, 1)
sleep(10000)
ControlClick ("", "", "[CLASSNN:TEXTEDIT4]", "left", 2, 1, 1)
Send("^{Ins}")
_ExcelWriteCell($oExcel, "E2")
Скрипт отрабатвает нормально до предполседнего действия .
Вопрос - как записать в закрытый файл Excel значение - скопированное в буфер обмена. Через буфер по тому - что по другому значение получить не получаеться.
И сразу второй вопрос - как сделать цикл.
Заранее спасибо за ответы!