Close Event

Sub object_Close(Cancel As Boolean)

object    An expression that evaluates to an object in the Applies To list. In Microsoft Visual Basic Scripting Edition (VBScript), use the word Item.

Cancel Optional (not used in VBScript). False when the event occurs. If the event procedure sets this argument to True, the close operation is not completed and the inspector is left open.

Remarks

In Microsoft Visual Basic Scripting Edition (VBScript), if you set the return value of this function to False, the close operation isn't completed and the inspector is left open. This event cannot be cancelled for the Inspector and Explorer objects.

If you use the Close method to fire this event, it can only be canceled if the Close method uses the olPromptForSave argument.

Example

This Microsoft Visual Basic/Visual Basic for Applications (VBA) example tests for the Close event and if the item has not been Saved, it uses the Save method to save the item without prompting the user.

Public WithEvents myItem As Outlook.MailItem

Public Sub Initalize_Handler()
	Set myItem = Application.ActiveInspector.CurrentItem
End Sub

Private Sub myItem_Close(Cancel As Boolean)
	If Not myItem.Saved Then
 	   myItem.Save
	   MsgBox " The item was saved."
	End If
End Sub