Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Word
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 21.12.2015, 15:18   #1
samart4
Новичок
Джуниор
 
Регистрация: 21.12.2015
Сообщений: 1
По умолчанию Перехват команды Вставка рисунка Word

Появилась необходимость перехватывать событие открытия окна вставки изображения в документ Word.
При нажатии на кнопку в центре в Word 2010 (и 2007) открывается окно выбора изображения (скриншот 1 и 2). Можно ли как-то перехватить эту команду?

Начал копаться в командах Word, вроде бы нашел похожие по названию команды (InsertPicture и InsertPicture3), но их события не перехватываются. Команда вставки шаблона выбора изображения перехватывается (поместил в модуль ThisDocument):

Код:
Sub ContentControlPicture()
    MsgBox "ContentControlPicture"
End Sub
Все остальные команды не перехватываются при попытке вставить изображение (если нажать кнопку "Место для рисунка"):

Код:
Sub EditPaste()
    MsgBox "EditPaste"
End Sub
 
Sub InsertPicture()
    MsgBox "InsertPicture"
End Sub
 
Sub InsertPicture3()
    MsgBox "InsertPicture3"
End Sub
 
Sub DrawInsertWordPicture()
    MsgBox "DrawInsertWordPicture"
End Sub
 
Sub DrawPictureInline()
    MsgBox "DrawPictureInline"
End Sub
 
Sub DrawToggleSelectObjectMode()
    MsgBox "DrawToggleSelectObjectMode"
End Sub
 
Sub EditObject()
    MsgBox "EditObject"
End Sub
 
Sub EditLinks()
    MsgBox "EditLinks"
End Sub
 
Sub EditPictureEdit()
    MsgBox "EditPictureEdit"
End Sub
 
Sub EditSource()
    MsgBox "EditSource"
End Sub
 
Sub PasteAsPicture()
    MsgBox "PasteAsPicture"
End Sub
 
Sub EditAutoText()
    MsgBox "EditAutoText"
End Sub
 
Sub EditObjectText()
    MsgBox "EditObjectText"
End Sub
Зачем все это нужно: В Word 2016 (возможно еще в Word 2013, не проверял) окно вставки рисунка позволяет не только вставлять локальные файлы, но также и вставлять картинки из интернета с помощью Bing и аккаунтов (OneDrive и т. д.). Но это окно открывается долго, хотелось бы вместо него сразу открывать окно выбора локального файла (как это делается в 2007 и 2010). Реально ли такое сделать с помощью макросов?
Изображения
Тип файла: jpg 1.jpg (43.4 Кб, 154 просмотров)
Тип файла: jpg 2.JPG (70.6 Кб, 73 просмотров)
samart4 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
вставка рисунка в формулу Jaroslav Microsoft Office Excel 2 13.05.2014 12:42
Вставка рисунка KotMashina Паскаль, Turbo Pascal, PascalABC.NET 3 24.05.2013 07:55
Вставка рисунка КТатьяна Microsoft Office Excel 2 05.05.2011 05:35
Вставка рисунка макросом sasha_prof Microsoft Office Excel 3 16.09.2010 09:41
Вставка рисунка, сохраненного из Image в MS Word artemavd Общие вопросы Delphi 0 22.08.2010 14:48