Поделиться через


Событие Application.WindowBeforeRightClick (Word)

Происходит, когда область редактирования окна документа щелкается правой кнопкой мыши перед действием по умолчанию.

Синтаксис

Частное выражение Sub._'WindowBeforeRightClick** (Sel As Selection**, Cancel As Boolean)

Выражение Переменная, представляющая объект Application, объявленный с событиями в модуле класса.

Параметры

Имя Обязательный или необязательный Тип данных Описание
Sel Обязательный Selection Текущий выбор.
Отмена Обязательный Boolean Значение false при возникновении события. Если процедура события задает этому аргументу значение True, действие по умолчанию при щелчке правой кнопкой мыши не выполняется после завершения процедуры.

Замечания

Дополнительные сведения об использовании событий с объектом Application см. в разделе Использование событий с объектом Application.

Пример

В этом примере пользователю предлагается ответ "да" или "нет" перед выполнением действия по умолчанию. Этот код должен быть помещен в модуль класса, и экземпляр класса должен быть правильно инициализирован, чтобы увидеть этот пример работы. Инструкции по выполнению этой задачи см. в разделе Использование событий с объектом Application.

Public WithEvents appWord as Word.Application 
 
Private Sub appWord_WindowBeforeRightClick _ 
 (ByVal Sel As Selection, Cancel As Boolean) 
 Dim intResponse As Integer 
 
 intResponse = MsgBox("Selection = " & Sel & vbLf & vbLf _ 
 & "Continue with operation on this selection?", _ 
 vbYesNo) 
 If intResponse = vbNo Then Cancel = True 
End Sub

См. также

Объект Application

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.