Событие Explorer.BeforeItemCopy (Outlook)

Статья
04/07/2023

Происходит при копировании элемента Outlook.

Синтаксис

выражение. BeforeItemCopy( _Cancel_ )

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

Параметры

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

Замечания

Это событие можно отменить после его запуска.

Пример

В следующем примере Microsoft Visual Basic для приложений (VBA) пользователь запрашивает запрос перед копированием элемента. Пользователю отображается сообщение о том, что элемент должен быть скопирован. Если пользователь нажимает кнопку Да, элемент копируется в буфер обмена. Пример кода должен быть помещен в модуль класса, например ThisOutlookSession, и подпрограмма должна быть вызвана Initialize_handler , прежде чем процедура события может быть вызвана Microsoft Outlook.

Public WithEvents myOlExp As Outlook.Explorer 
 
 
 
Sub Initialize_Handler() 
 
Set myOlExp = Application.ActiveExplorer 
 
End Sub 
 
 
 
Private Sub myOlExp_BeforeItemCopy(Cancel As Boolean) 
 
'Prompts the user before copying an item 
 
 
 
 Dim lngAns As Long 'user answer 
 
 'Display question to user 
 
 lngAns = MsgBox("Are you sure you want to copy the item?", vbYesNo) 
 
 If lngAns = vbYes Then 
 
 Cancel = False 
 
 Else 
 
 'Set Cancel argument based on answer 
 
 Cancel = True 
 
 End If 
 
 
 
End Sub

См. также

Объект Explorer

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

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

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