EnvelopeShow 事件

当显示 MsoEnvelope 对象相对应的用户界面 (UI) 时发生。

Private Sub object_EnvelopShow()

object 该变量引用在类模块中随事件声明的 MsoEnvelope 类型对象。

示例

本示例创建 MsoEnvelope 对象的事件处理例程。

Public WithEvents env As MsoEnvelope

Private Sub Class_Initialize()
    Set env = Application.ActiveDocument.MailEnvelope
End Sub

Private Sub env_EnvelopeShow()
    MsgBox "The MsoEnvelope UI is showing."
End Sub

Private Sub env_EnvelopeHide()
    MsgBox "The MsoEnvelope UI is hidden."
End Sub