AHK: Работа с Word

Что за манипуляции вы пытались сделать в этом коде? Пример ожидаемого ответа: послать нажатие того-то, перенести из буфера то-то.

Сегодня еще поковырялся - результаты таковы:
по отдельности все прекрасно работает

F5::Send ^+{Right}{Ins}^{vk43} - копировать слово после курсора
F7::Send !{F4}{enter} - закрыть активное окно с сохранением изменений
F8::Send {vk71}^{vk56}{enter} - переименовать выделенный файл,вставить в имя содержимое буфера обмена,сохранить.

Попытался объединить - закрывает с сохранением изменений и все.
Вот то,что пишу

F9::Send ^+{Right}{Ins}^{vk43}!{F4}{enter}{vk71}^{vk56}{enter}

Как объединить эти три скрипта в один,чтобы заработало?

Спасибо большое,помогло.)

А вот тут вышла заминка. Первые два действия выполняются,последнее ни в какую. Увеличивал задержку последовательно до 3000, и никаких результатов. Еще раз проверил последнюю строку - отдельно код работает...

Буду знать,спасибо!

А у вас что закрытие ворда мгновенное? И после закрытия выделение сразу на проводнике с этим файлом устанавливается?

SendMode Input
#If WinActive("ahk_class OpusApp") ; хоткей действует только при активном окне Word-a (в скобках класс окна Word 2013 года)

; в 2013 можно вызвать окно "Сохранить как" нажав: альт+(ф,к,1)
; {vk12 down}{vk41}{sleep 100}{vk52}{sleep 100}{vk31}{vk12 up}
; переименуем - зажмем шифт и 4 раза стрел влево, чтоб оставить расширение.(хотя может и не нужно это)
; {vk10 down}{vk25 4}{vk10 up}^{vk56}{enter}
; все вместе. (Не испытано.Используя данный скрипт, вы соглашаетесь с лицензией BSD. Автор ответсвенности не несет:-)

F8::
Send ^+{Right}{Ins}^{vk43}{sleep 300}{vk12 down}{vk41}{sleep 100}{vk52}{sleep 100}{vk31}{vk12 up}{sleep 500}{vk10 down}{vk25 4}{vk10 up}^{vk56}{enter}
return
#If

Конечно, в AHK есть все инструменты для этого, но раз уж вы вызываете окошко сохранения, то почему не нажать F4 и ввести нужный вам путь.

SendMode Input
;...
send ^{vk43} ; ctrl+c
myFile:=clipboard
;...
send ^{vk43} ; ctrl+c
myDate:=clipboard
; ...
send {F4}^{vk41}{del}C:\%myDate%\file_%myFile%.doc{enter}

Можно сохранять буфер в свои переменные в определенных моментах.

Переменные можно называть как угодно и присваивать им любое (почти) значение, в том числе и содержимое других переменных, такой как clipboard (это встроенная в AHK переменная, остальные можно посмотреть в справке).

; копируем нужный текст
bufer:=clipboard ; сохраняем в свою переменную, чтобы потом использовать
; копируем другой текст
Other:=clipboard ; в другую переменную

В справке также есть инфо об этом и многом другом с примерами.

http://www.script-coding.com/AutoHotkey … 46.07.html

http://www.script-coding.com/AutoHotkeyTranslation.html

http://forum.script-coding.com/viewtopic.php?id=3042

; ...
Send ^{vk43} ; копирую номер
myDate1:=clipboard
Sleep,100
Send {vka2 down}{down 5}{vka2 up}
Send ^{Right 3} ; ищу дату
Sleep,100
Send ^+{Right}{Ins}
Send ^{vk43} ; копирую дату
myDate2:=clipboard
Sleep,100
Send {f12}
Sleep,300
Send ^{vk56}%myDate1% ; вставляю номер в имя файла(курсор автоматически стоит в графе имя файла)
Sleep,300
Send {F4}^{vk41}{del}C:\Users\Максим\Desktop\Папка скрипта\%myDate2%{enter} ; вставляю дату в путь в  назв. папки
Sleep,100
Send {enter}
; ...

Что то у меня с руками беда походу(.
Во первых,в имя файла вставляются сразу две переменных - и дата, и номер.(ДатаНомер)
Во вторых, папка не создается, т.е. если по адресу нет такой папки - выдается ошибка. (Не удается найти C:\Users\Максим\Desktop\Папка скрипта\Дата Проверьте,правильно ли написаны слова для поиска и повторите попытку.)
В третьих, даже если создам в ручную папку - не желает ни в какую сохранять файл - остается окно сохранения.

Спасибо,дружище,за совет!)

ClipWait, 2
if ErrorLevel <> 0
{
    MsgBox, Попытка скопировать текст в буфер обмена неудачна.
    Return
}
MsgBox, clipboard = %clipboard%

Это помогло мне найти ошибку в коде,увидел,что переменные сохранялись правильно. Все оказалось совсем просто -

Send ^{vk56}%myDate1% ; вставляю номер в имя файла(курсор автоматически стоит в графе имя файла)

вот ошибка в чем, я вставлял содержимое буфера и переменной одновременно)

Тоже спасло меня от нудного перебирания вручную файлов,и создания кучи папок. Теперь можно добавить еще третью переменную, создавать многоуровневые папки и сортировать по ним док-ы. Это здорово!)

А насчет сохранения возникал вопрос - после вставки имени файла и указания пути сохранения почему то не закрывалось окошко сохранения, что бы я ни пытался сделать. Пришлось решать эту проблему довольно топорно

Send {f12}
Sleep,300
Send %myNumber% ; отправляю ввод имени файла из переменной
Sleep,300
FileCreateDir C:\Users\Максим\Desktop\Папка скрипта\%myDate%\%myStantion% ; создаю папки при помощи двух переменных
Sleep,200
Send {F4}\%myDate%\%myStantion%{enter} ; отправляю ввод пути сохранения файла
Sleep,300
Send {vk09 13} ; отправляю нажатие Tab 13 раз,чтобы выделить кнопку "Сохранить"
Sleep,300
Send {enter}

Увеличивал задержки,менял количество нажатий энтера,пытался использовать "горячие" клавиши - все бестолку... В любом случае,теперь код работает,как надо,хотя иногда совершает ошибки.

Еще раз Большое Спасибо Alectric за ценные советы и подсказки, а так же огромная благодарность stealzy за отличные примеры и образцы кодов!!!

Это намного удобнее,чем считать кол-во нажатий Tab! Отлично.
Еще одна ценная монетка в копилку знаний об AHK

Почему глупый? Все нормально! Ведь при отправке нажатия F12 по умолчанию активен контрол с именем файла. А для активации контрола с путем сохранения файла, нажатие  F4 как раз помогает.
В принципе,для надежности,его можно заменить на ControlSetText, но и F4  еще ни разу не подводил,даже при совершении большого количества циклов.

Использовал в другом скрипте, и, честно сказать, не почувствовал разницы.
Его нужно писать сразу,после присвоения гор. клавиши?

vk53::
SendMode Input
Loop 4 {
Sleep,600 ; эта пауза нужна для задержки перед следующим выполнением цикла
Click down 435, 398
;...

Спустя некоторое время

Код полностью автоматизирован, от меня нужно только поставить кол-во повторений. Заметил, что каждый первый запуск скрипта за день (ну или сеанс) обречен на провал. Копирует не то, как следствие сохраняет не те папки (в том случае,если вообще дошел до этого момента).А может и вообще открыть не те вкладки и т.д.
Вчера вот узнал о существовании вкладок и окон ворда, о которых ранее и не подозревал .
Но суть не в этом. Попробовал дописать SendMode Input,как в приведенном выше примере и код совсем сбрендил. Раньше хоть перезапустишь - и работает нормально. Тут же я с большим трудом то  закрыл сам скрипт - трей постоянно сворачивался, то вовсе был не активен,но даже после закрытия не все закончилось. Некоторое время продолжалась эмуляция нажатия и удержания кнопки Ctrl. Потом закончилось само по себе)

OFF:
Не сказать, что у меня сильно слабое железо.Тем более для таких простых операций.
Волей не волей поверишь в скайнет...

Точно, я об этом не подумал,спасибо. Только вот необходимость в создании папок пропала  в связи с тем, что следующему скрипту нужно будет искать эти файлы и взаимодействовать с ними. http://forum.script-coding.com/viewtopic.php?id=10182

vk53::
Loop 3 {
Sleep,600
Click down 435, 398
sleep,100
Send {down 22}
sleep,200
MouseMove 1858, 894
Click up
Sleep,200
Send ^{vk43}
Sleep,300
WinActivate ahk_exe winword.exe
Winwaitactive ahk_exe winword.exe
Send ^{vk56}
Sleep,1000
Send ^{vk24}
Sleep,300
Send {vka2 down}{down 5}{vka2 up}
Send ^{Right}
Sleep,100
Send ^+{Right}{Ins}
Send ^{vk43}
myNumber:=clipboard
Sleep,100
Send {f12}
Sleep,300
Send ^{vk41}{del}C:\Users\Максим\Desktop\Documents\%myNumber%{enter}
Sleep,600
ControlClick, button8, A
Sleep,600
Send ^{vk41}
Sleep,500
Send {del}
Sleep,100
WinActivate ahk_exe chrome.exe
Winwaitactive ahk_exe chrome.exe
Sleep,100
Send ^{up}
}
Return

При первом запуске код обязательно заглючит. Будет копировать весь текст столбцом вдоль левого края документа,притом очень долго.
И еще. В зависимости от названия папки может выдавать ошибку, что такой папки не найдено, при сохранении файла.
Если название написано кириллицей и в два или более слова - обязательно заглючит. Так же, даже если написано одно слово в названии папки,но с большой буквы - есть вероятность что опять выдаст ошибку.
Я решил, чтобы обойти эти проблемы, создавать папки только с латинскими буквами в названии.