EnvelopeShow 事件
优质
小牛编辑
127浏览
2023-12-01
当显示 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