Override "Send this Sheet"

Hi,

I need to capture the "Send this sheet" button click event to override its
functionality. "Send this Sheet" can be found on opening File -> Send To ->
Mail Recepient.

It can also be found using ActiveWorkbook.EnvelopeVisible = True in VBA.

Thanks!

Sub noenvelope()
ThisWorkbook.EnvelopeVisible = False
End Sub

--
Don Guillett
SalesAid Software
[email protected]
"Priya" <[email protected]> wrote in message
news:[email protected]...
> Hi,
>
> I need to capture the "Send this sheet" button click event to override its
> functionality. "Send this Sheet" can be found on opening File -> Send
> To -> Mail Recepient.
>
> It can also be found using ActiveWorkbook.EnvelopeVisible = True in VBA.
>
> Thanks!
>