[Nik1598]

Приветствую, у меня есть задача обработать большой массив блоков командой FLATSHOT, при попытке написать код на VBA столкнулся с проблемой - окно FLATSHOT не меняется независимо от значения переменной FILEDIA.

Судя по паре тем на других форумах автоматизацией этой команды никто толком и не занимался.

Мне пришла мысль, что можно какими-то сторонними средствами эмулировать нажатие клавиши ENTER, но мои попытки поработать с BAT и VBS файлами особой пользы не принесли.
Подскажите, приходилось ли кому-то эмулировать нажатие клавиш через VBA с помощью сторонних программ.

[AlexKniga]

Сообщение от Nik1598 можно какими-то сторонними средствами эмулировать нажатие клавиши

https://learn.microsoft.com/ru-ru/wi...ated-functions

[Nik1598]

Сообщение от AlexKniga https://learn.microsoft.com/ru-ru/wi...ated-functions

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

Sub Prob()


'проекция
ThisDrawing.Application.ZoomScaled 0.5, acZoomScaledRelative ' уменьшение масштаба, иначе косячит

Call Ent 'вызов нажатия enter
ThisDrawing.SendCommand ("_flatshot" & vbCr & "Р" & vbCr & "Да" & vbCr & "0,0,0" & vbCr & "1" & vbCr & "1" & vbCr & "0" & vbCr) & vbCr 'плоский снимок


End Sub

Sub Ent()

'нажатие enter для плоского снимка
SendKeys "{ENTER}"

End Sub