Недавние сообщения

Страницы: [1] 2 3 ... 10
1
Стол заказов / Re: Запуск макросов Excel
« Последний ответ от ra4o Отправлен Сегодня в 16:31:29 »
Если книга уже открыта, то попробуйте так:
Код: AutoIt [Выделить]
#include <Excel.au3>
Local $oExcel = _Excel_Open()
$oWorkbook=_Excel_BookAttach(@ScriptDir & "\Шаблон.xlsb")
$oWorkbook.Application.Run("Test0")

2
Путь к установленному приложению можно прочитать из реестра, вот, например для "Acrobat Reader"
Код: AutoIt [Выделить]
$sFileName='AcroRd32.exe'
$sPath=RegRead('HKEY_LOCAL_MACHINE\SOFTWARE\Adobe\Acrobat Reader\DC\InstallPath','')
MsgBox(0,'',FileGetVersion($sPath&'\'&$sFileName))

3
Стол заказов / Re: Запуск макросов Excel
« Последний ответ от Василий Отправлен Сегодня в 16:16:29 »
Макрос работал. но не так как мне нужно. я описывал ситуацию, где у меня уже запущен файл Шаблон.xlsb.
А ваш макрос заново его запускает. Мне нужно что бы просто макрос запускался, без запуска макроса. В идеале бы проверку в вашем коде сделать, например: если файл уже открыт, то открывать не надо, или просто вообще не открывать файл, а запускать сразу макрос.
4
Версия AutoIt: v3.3.14.5

Описание: Нужно сделать разный алгоритм работы для разных версий приложения.
Возможно получится с помощью пути, где лежит exe-файл.

Для примера установлена программа Adobe Premiere версии CS 5.5 по пути:
C:\Program Files\Adobe\Adobe Premiere Pro CS5.5\Adobe Premiere Pro.exe

И версия CC 2019:
C:\Program Files\Adobe\Adobe Premiere Pro CC 2019\Adobe Premiere Pro.exe

И в дальнейшем, в зависимости от версии запустить тот или иной алгоритм действий. Например вывести номер версии на экран всплывающим сообщением.

instance там повторяются.
handle тоже меняется.
Возможно получится определить версию по другому параметру, не по пути.

Примечания:
Описания процессов прилагаю:
(нажмите для показа/скрытия)
(нажмите для показа/скрытия)
5
Общие вопросы по AutoIt / Re: Изменить расположение msgbox
« Последний ответ от ra4o Отправлен Сегодня в 13:27:06 »
Видимо не внимательно читали, в той теме одним из решений была ссылка на UDF "MsgBox.au3" от CreatoR, прикрепляю ниже (чуть исправил - закомментировал блок с глобальными переменными)
Вот и пример (тоже чуть изменил)
Код: AutoIt [Выделить]
#include "MsgBox.au3"

$MB_MESSAGEBEEP = 1
$MB_TIMEOUTCOUNT = 1

$nFlags = BitOR($MB_TOPMOST, $MB_SYSTEMMODAL, $MB_DEFBUTTON1, $MB_ICONASTERISK, $MB_YESNO)
$sTitle = "My Custom MsgBox"
$sText = "Are you sure?"
$iTimeOut = 2
$hWnd = WinGetHandle("")

$Ask = _MsgBoxEx($nFlags, $sTitle, $sText, $iTimeOut, $hWnd,10,10)
ConsoleWrite(StringFormat("+ Return: %i\n! TimedOut: %s\n", $Ask, @extended = 1))

6
Стол заказов / Re: Запуск макросов Excel
« Последний ответ от ra4o Отправлен Сегодня в 13:12:44 »
Я ошибся в названии переменной - лишнюю букву написал, исправил в предыдущем сообщении, скопируйте ещё раз.
Запустить можно и прямо из SciTE клавишей "F5"
С Вашими данными:
Код: AutoIt [Выделить]
#include <Excel.au3>
Local $oExcel = _Excel_Open()
$oWorkbook=_Excel_BookOpen($oExcel, @ScriptDir & "\Шаблон.xlsb",False,True)
$oWorkbook.Application.Run("Test0")

7
Общие вопросы по AutoIt / Re: Изменить расположение msgbox
« Последний ответ от alex1912 Отправлен Сегодня в 12:23:08 »
Да, видел эту тему. Вчера весь день пробовал, но так и не получилось у меня интегрировать это в мой скрипт в первом посте(
8
Стол заказов / Re: Запуск макросов Excel
« Последний ответ от Василий Отправлен Сегодня в 11:32:12 »
А куда этот код вставлять?


я сделал так:
- открыл редактор SciTE.exe
- вставил туда ваш код, немного изменив под себя.
и получилось так, больше ничего кроме этого кода там нет это всё что есть:

#include <Excel.au3>
Local $oExcel = _Excel_Open()
$oWorkbook=_Excel_BookOpen($oExcell, @ScriptDir & "\Шаблон.xlsb",False,True)
$oWorkbook.Application.Run("Test0")


-Потом сохраняю в файл 1.au3.
- Кладу этот файл рядом с файлом Шаблон.xlsb
- Запускаю файл Шаблон.xlsb
- Запускаю двойным нажатием лкм файлик старт.au3
И выдаёт ошибку.
Прикрепил скриншот ошибки
Прикрепил скриншот внутренности файла 1.au(Верно ли там всё или ещё какой то код нужно там добавить?)
9
Стол заказов / Автоматизировать драйвер сканера C:\WINDOWS\system32\wiaacmgr.exe
« Последний ответ от lemonia Отправлен Сегодня в 11:16:31 »
Версия AutoIt: 3.3.14.0 планирую установить следующую версию.
Примечания: Windows XP

Описание:
Прошу автоматизировать таким образом, чтобы между переворотами страницы нажимать нужно было кнопку запуска сканирования только один раз. И лучше, чтобы это была клавиша пробела. Там может быть разное время сканирования на разных страницах и настройках качества, то есть привязку желательно делать не ко времени, а к чему то ещё. Если это проблематично за одно нажатие клавиши делать, согласен на несколько нажатий.

 
10
Стол заказов / Re: Запуск макросов Excel
« Последний ответ от ra4o Отправлен Сегодня в 09:21:44 »
Пробуйте так:
Код: AutoIt [Выделить]
#include <Excel.au3>
Local $oExcel = _Excel_Open()
$oWorkbook=_Excel_BookOpen($oExcel, @ScriptDir & "\Test.xls",False,True)
$oWorkbook.Application.Run("Макрос1")

Страницы: [1] 2 3 ... 10