Перемещение листа в Visio - Компьютерный форум OSzone.net

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Microsoft Office (Word, Excel, Outlook и т.д.) (http://forum.oszone.net/forumdisplay.php?f=115)

- - Перемещение листа в Visio (http://forum.oszone.net/showthread.php?t=192276)

Перемещение листа в Visio

Здравствуйте!

В Visio 2000 для перемещения листа вверх/вниз можно было нажать скролл, при этом курсор принимал форму руки, и удерживая его двигать лист в нужном направлении. На сколько сдвинул курсор-руку на столько и сдвинулся лист.
В версиях 2003, 2007 и, подозреваю 2010, для перемещения листа необходимо нажать скролл, при этом появляется кружок со стрелками, и сдвинуть курсор относительно кружка в обратном, движению листа, направлении. Для остановки перемещения надо отжать скролл.

Как для меня, то в Visio 2000 реализация перемещения листа была гораздо удобнее.

Вопрос: можно ли как-то в новых версиях сделать перемещение листа как в visio 2000?

Спасибо.

Как двигать холст в Visio, удерживая правую или среднюю кнопку мыши.
Штатно Visio так не умеет. Но можно двигать холст в Visio, удерживая Ctrl+Shift+ПравуюКнопкуМыши, что очень неудобно.
Итого, была нужна замена "держим Ctrl+Shift+ПравуюКнопкуМыши + двигаем мышь" → "держим СреднююКнопкуМыши (или правую кнопку) + двигаем мышь"

Для решения я использовал самописный скрипт на AutoHotKey (wiki и документация тут: https://ahk-wiki.ru )

Код:

#If WinActive("ahk_exe visio.exe")        ;работа скрипта только в окне Visio



MButton::                                ;нажимаем СреднююКнопкуМыши. Если надо удерживать нажатой ПравуюКнопкуМыши — в этом месте заменить на RButton

While GetKeyState("MButton", "P")=1        ;держим нажатой CКМ. Если надо ПКМ — в этом месте заменить на RButton

{

SendInput {Control Down}{Shift Down}        ;отправляем нажатие CTRL+Shift

Sleep, 20                                ;ждём 20 мс, иначе у меня была некорректная работа скрипта

SendInput {RButton Down}                ;отправляем нажатие ПКМ (тут на MButton менять не нужно, тк в Visio надо отправить именно ПКМ)

KeyWait MButton                                ;отжимаем CКМ. Если удобнее с нажатой ПКМ — в этом месте заменить на RButton

SendInput {Control Up}{Shift Up}{RButton Up};отправляем отжатие всех кнопок (тут на MButton менять не нужно, тк в Visio надо отправить отжатие именно ПКМ)

}

Return

зы. Сори за некропостинг, но сюда яндекс ведёт поисковый траффик на вопрос из заголовка. Сам измучился, пытаясь решить:)