Partager via


Événement Explorer.BeforeMove (Outlook)

Se produit lorsque l’explorateur est déplacé par l’utilisateur.

Syntaxe

expression. BeforeMove( _Cancel_ )

Expression Variable qui représente un objet Explorer .

Parameters

Nom Requis/Facultatif Type de données Description
Cancel Obligatoire Booléen False lorsque l'événement se produit. Si la procédure événementielle affecte la valeur True à cet argument, l'opération n'est pas achevée et l'objet Explorer ou Inspector n'est pas déplacé.

Remarques

Cet événement peut être annulé après son déclenchement.

Exemple

L’exemple Microsoft Visual Basic pour Applications (VBA) suivant montre comment inviter l’utilisateur à envoyer un message avant que l’explorateur ne soit déplacé par l’utilisateur. Si l’utilisateur clique sur Oui, l’explorateur peut être déplacé par l’utilisateur. L’exemple de code doit être placé dans un module de classe tel que ThisOutlookSession, et la Initialize_Handler() sous-routine doit être appelée avant que la procédure événementielle puisse être appelée par Microsoft Outlook.

Public WithEvents myOlExp As Outlook.Explorer 
 
 
 
Sub Initialize_Handler() 
 
 Set myOlExp = Application.ActiveExplorer 
 
End Sub 
 
 
 
Private Sub myOlExp_BeforeMove(Cancel As Boolean) 
 
'Prompts the user before moving the window 
 
 
 
 Dim lngAns As Long 
 
 
 
 lngAns = MsgBox("Are you sure you want to move the current window? Use your keyboard to make your selection.", vbYesNo) 
 
 If lngAns = vbYes Then 
 
 Cancel = False 
 
 Else 
 
 Cancel = True 
 
 End If 
 
 
 
End Sub

Voir aussi

Explorer, objet

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.