发送邮件

wakwe

需求1：最近需要将不同的表发给不同的人，YOUXIANG用的163，请问如何使用VBA发送，最好是批量发送需求2：更进一步的是，一个工作表中假设有10行，我需要把第1-3行发送给第1个人，4-7行发送给第2个人，每个人的名字在数据的下方，表中的人名只有名字，但是我发送YOUJIAN时收件人格式为“地区-姓名”，收件人存在YOUXIANG里，有备注名。
现在有3个问题：
1、我想达到需求1，现在的方法是把每个人的数据单独复制出来，单独成表再发走，有人可以帮我发个VBA源码吗，我在网上大概看了看，就是在设置邮箱那里问题比较多。
2、在问题1的基础上，可以VBA做表再自动发走吗。
3、在问题2的基础上，如何满足需求2，我想的最好的状态是，可以直接把每个人的数据发走，不需要生成大量工作簿，或者能自动生成工作簿后，发送邮件结束后再自动删除。
附件有数据的位置例子，我的叙述可能有点啰嗦，有歧义，不清楚还可以问我。