To: mineshine老师。（Excel自动发邮件延伸问题）

almmt · 发表于 2009-4-16 18:45

Sheets("CFD").[A65536].End(xlUp).Row 这句什么意思啊？
[A65536].End(xlUp).Row这个什么属性 or 方法?

neng_wu · 发表于 2009-4-22 01:44

mineshine老师
太感谢你的东西了

neng_wu · 发表于 2009-4-22 02:09

mineshine老师请问如果我在邮件正文中想将Excel 表格直接粘贴过去（或则作为图片粘贴）怎么操作呢

我想利用Excel自动发送的邮件有文字和excel表格

我本来想用ｖｂａ　先在Ｗｏｒｄ里编辑好在粘贴过去，不过怎么也不能实现
我看有好多朋友都遇到这样的问题了，希望你赐教

mineshine · 发表于 2009-4-29 09:42

我用下面网页修改，你看可以吗?

Mail worksheet in the body of the mail
http://www.rondebruin.nl/mail/folder3/mail2.htm

neng_wu · 发表于 2009-5-11 00:53

mineshine 非常感谢您能在百忙中还指点我
这段代码我也试过，能粘贴表格，但是我要的是粘贴图片，而且还有其他文字，和图片
我找到了另外一种方式先用excel建一个word ，再对word进行写操作，最后以用word的发送邮件功能实现
这样做在排版上很好看
不过还是要感谢您无私的指导，您是我见过做好的老师，不但讲解很详细甚至连代码都写好
您就是侠之大者

markqin · 发表于 2009-6-25 22:33

收藏了,htm是我没想到过的.不错

liang.yanli · 发表于 2011-9-21 17:44

我有个问题啊，我想设置正文的字号为11pt，该如何设置啊,一直不成功设置的为小四

cnfeng · 发表于 2011-11-9 18:06

太感谢了. 研究一天, 头都大了.
这帖子, 如雪中送炭呀
mineshine老师功力太强了, PF

雷九 · 发表于 2011-12-15 10:50

本帖最后由雷九于 2011-12-15 11:04 编辑

mineshine与canciaw两位老师好，我运行你们这个宏的时候总在“Set Recipient = MailItem.Recipients.Add(Sheets("CFD").Range("V" & i).Value)”这一句报错，说“运行时错误287：应用程序定义或对象定义错误”。希望老师指点一下。非常谢谢

mineshine · 发表于 2011-12-15 11:19

雷九发表于 2011-12-15 10:50
mineshine与canciaw两位老师好，我运行你们这个宏的时候总在“Set Recipient = MailItem.Recipients.Add(Sh ...

这句代码我已改过
建议查看6楼楼主问题，及7楼我的修改。

		自动登录	找回密码
密码			免费注册

[求助] To: mineshine老师。（Excel自动发邮件延伸问题）

好贴一定要顶起

回复 15楼 neng_wu 的帖子

评分

非常感谢mineshine