Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Происходит непосредственно перед включением правки в документе в указанном окне защищенного представления.
Синтаксис
выражение.
ProtectedViewWindowBeforeEdit( _PvWindow_ , _Cancel_ )
выражение Выражение, возвращающее объект Application .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| PvWindow | Обязательный | ProtectedViewWindow | Окно Защищенное представление, содержащее документ, который включен для редактирования. |
| Отмена | Обязательный | Boolean | Значение false при возникновении события. Если процедура события задает этому аргументу значение True, редактирование в документе не включено. |
Пример
В следующем примере кода пользователю предлагается ответ "да" или "нет" перед включением редактирования документа в окне защищенного представления. Этот код должен быть помещен в модуль класса, и экземпляр класса должен быть правильно инициализирован, чтобы этот пример кода работал правильно. Дополнительные сведения о том, как это сделать, см. в разделе Использование событий с объектом Application.
В следующем примере кода предполагается, что в общих объявлениях объявлена переменная приложения с именем App и задана переменная, равная объекту Word Application.
Private Sub App_ProtectedViewWindowBeforeEdit(ByVal PvWindow As ProtectedViewWindow, Cancel As Boolean)
Dim intResponse As Integer
intResponse = MsgBox("Do you really " _
& "want to edit the document?", _
vbYesNo)
If intResponse = vbNo Then Cancel = True
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.