[问题] Excel VBA 寄信给对应的收件人

楼主: kiss970621 (Johnson)   2016-04-30 16:16:19
(若是和其他不同软件互动之问题 请记得一并填写)
软件:excel 2010
小弟想写一个vba将固定的格式内容寄信给对应的人
原始档长这样 https://imgur.com/WMgFAnF
收件人都在在F栏
要把表头加上第一列的内容寄给第一列的收件人(AAA@gamil.com)
像这样https://imgur.com/hk4IvVd (左图就是AAA收到的内容)
然后表头不动 只加上第二列的内容寄给第二列的收件人(BBB@gmail.com)
像这样https://imgur.com/3NI44Ka (左图就是BBB收到的内容)
执行宏后 一直依此类推执行到最后一列
该如何写呢?感谢各位神人
作者: soyoso (我是耀宗)   2016-04-30 17:32:00
楼主: kiss970621 (Johnson)   2016-05-01 01:28:00
.To = r.Offset(, 5) 这部分有点不懂 5是移动到F字段那逗号前面的数值应该填多少?不管填多少执行都会跑出 执行阶段错误'-2147417851(80010105)':'To'方法('MailItem'物件) 失败麻烦s大解惑><
作者: soyoso (我是耀宗)   2016-05-01 01:44:00
0或省略表示列的部分无移动
楼主: kiss970621 (Johnson)   2016-05-01 01:49:00
执行到 .To = r.Offset(, 5)就会跑出如上说的错误我有哪个地方没有调整到吗?><
作者: soyoso (我是耀宗)   2016-05-01 01:58:00
作业系统为win10吗?是的话请参考http://goo.gl/Fw8KKw解决方式应为https://imgur.com/2IIoadk因无win10,原po试试看是否可解决
楼主: kiss970621 (Johnson)   2016-05-01 11:13:00
成功了!!!!soyoso大太神了....小弟感激不尽

Links booklink

Contact Us: admin [ a t ] ucptt.com