我要用VBA通过outlook自动发送邮件,之前发的都没有问题,这次修改了Emailbody, 然后就总提示语法错误,又说缺少结束语语句,求高手帮忙
发送的文本格式是这样的,<>代表是获取表中的活动单元格
<>您好:
您的手机号为:<>,
您手机话费报销标准为:<>,
本月产生费用为:<>,
您*月手机话费超过标准,超额:<>,
如超出费用是由于工作原因产生,请于<>前提交超费申请到集团行政管理部总务处<>(收)。如不及时提交超出费用将在您<>发放的工资中扣除。
查询话费使用情况,请拨打10086
如需查询明细,可登陆天津移动网上营业厅查询,网址 : http://www.tj.10086.cn/
如需帮助请拨打分机:3123。
感谢您对我工作的支持!
<>
我的Emailbody如下
EmailBody = "
您好!您的手机号为: " & Range("H" & i) < p > " & _
"您手机话费报销标准为: " & Range("J" & i) & "
. " & _"本月产生费用为: " & Range("I" & i) & "
. " & _"您" & Range("I" & 3) & "月手机话费超过标准,超额: " & Range("K" & i)
" & _
"如超出费用是由于工作原因产生,请于 " & Range("M" & i) & "
前提交超费申请到集团行政管理部总务处**(收)。如不及时提交超出费用将在您 " & Range("N" & i) & " 发放的工资中扣除。" & _"
查询话费使用情况,请拨打10086 " & _
"
如需查询明细,可登陆天津移动网上营业厅查询,网址 :http://www.tj.10086.cn/
" & _"
如需帮助请拨打分机:3123
" & vbCrLf & _"感谢您对我工作的支持!
总在第二行那报 错误:缺少语句结束
求高手帮看看