作者jason780419 (玉米)
看板Office
标题[问题] Excel VBA 使用outlook寄信疑问
时间Thu Oct 12 17:12:53 2017
各位前辈好
小弟最近再研究使用Excel VBA连结outlook自动发信
参考下列类似的VBA
http://www.rondebruin.nl/win/s1/outlook/amail6.htm
因信件内容需要更改格式
所以在body的部分，更改为.HTMLBody
寄信时使用英文的部分皆无问题
用中文时，公司外部收件者会出现大量乱码
但公司内部的收件者，查看皆正常
并且奇怪的是我私下测试给外部收件者
只发给一人时，是正常的
询问公司IT，他回答说可能是外部收件者编码的问题
但是我也无法一一要求外部收件者更改编码
请问各位前辈有其他解决方式吗？
谢谢
-----
Sent from JPTT on my HTC_D10i.
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 42.73.142.27
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1507799575.A.61A.html
1F：推 Iories: OutMail.BodyPart.Charset = "utf-8" 加这个试试？ 10/15 08:48
2F：推 Iories: 这是CDO.Message的方法，不确定用outlook是不是一样 10/15 08:50
3F：→ jason780419: 这方法我有google到过，也有人提出这方法，但是我试 10/15 17:04
4F：→ jason780419: 了一下有出错，那我再来试试，感谢!!! 10/15 17:04
5F：→ jason780419: 我们公司内部似乎把编码锁成UTF-8, 手动想改也没办法 10/26 17:26
6F：→ jason780419: 看来只好将内文改成英文 10/26 17:26