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