返回代表数据访问页电子邮件标题的 MsoEnvelope 对象。
expression.MailEnvelope
expression 必需。返回“Applies To”列表中的一个对象的表达式。
该示例为指定的数据访问页的电子邮件标题设置注释。
Dim envDAP As MsoEnvelope
Set envDAP = DataAccessPages(0).MailEnvelope
envDAP.Introduction = _
"Please review this report and let me know " & _
"what you think. I need your input by Friday. " & _
"Thanks."