EnvelopeVisible Property Example
This example checks to see whether the e-mail composition header and the envelope toolbar are visible in the first workbook. If they are visible, the example then sets the variable strSubject
to the text of the e-mail subject line.
If Workbooks(1).EnvelopeVisible = True Then
strSubject = "Please read: Review immediately"
End If