OlegSmirnov
Новичок
- Сообщения
- 52
- Репутация
- 0
Добрый день, господа программисты.
Помогите решить непростой вопрос.
Есть скрипт, который - изменяет положение определенной автофигуры в открытом файле эксель - через редактор AutoIt (по F5).
В данном случае - это фигура "Овал 2".
Как заставить этот скрипт - реагировать на щелчок по фигуре "Овал 2" - выводя на две секунды сообщение "щелчок по Овалу 2" ?
Помогите решить непростой вопрос.
Есть скрипт, который - изменяет положение определенной автофигуры в открытом файле эксель - через редактор AutoIt (по F5).
В данном случае - это фигура "Овал 2".
Как заставить этот скрипт - реагировать на щелчок по фигуре "Овал 2" - выводя на две секунды сообщение "щелчок по Овалу 2" ?
Код:
#include <Excel.au3>
$oExcel = _Excel_Open()
$oBook = _Excel_BookOpen($oExcel, @ScriptDir & "\345321.xls")
$iCount = $oBook.ActiveSheet.Shapes.Count
ConsoleWrite("Фигур: " & $iCount & @CRLF)
$sName = $oBook.ActiveSheet.Shapes(2).Name
ConsoleWrite("Имя второй: " & $sName & @CRLF)
; $oShape = $oBook.ActiveSheet.Shapes("Oval 2") ; по имени
$oShape = $oBook.ActiveSheet.Shapes(2) ; по индексу
Sleep(555)
$oShape.Select
Sleep(555)
$oShape.ScaleWidth(1.5, False)
Sleep(555)
$oShape.ScaleHeight(2, False)
Sleep(555)
$oShape.IncrementLeft(-100)
ConsoleWrite("Ширина: " & $oShape.Width & @CRLF)
ConsoleWrite("Высота: " & $oShape.Height & @CRLF)