背景:
对于一些使用outlook的公司或组织,使用outlook窗体进行规范邮件格式,而对于这些固定格式的邮件可以使用VBA进行提取邮件正文信息,汇总信息表。本例将演示如何操作。
需求:
演示邮件文本格式如下:
邮件正文内容提取信息汇总表如下:
按需求提取邮件中主题、策划人、复核人、财务、费用总计、截止日期、注意事项、邮件发送时间的信息,汇总成统计表
汇总表解决方案:
使用VBA,为方便用户操作,采用ActiveX Command控件,源代码及注释如下,具体实现过程就不多解释了,看注释。
注意点:正则匹配只获取第一次匹配内容,防止邮件文本内出现转发导致内容提取重复,因为最新的回复内容总是显示的上面的位置。
Command1源码 Command2源码
网友评论