Excel自动发送邮件（按条件发送）

wtb815 · 发表于 2009-2-12 17:57

不是工资条没关系，正在等待您的无私帮助，正盼望早点能把工资信息及时发送给职工们，谢谢！

canciaw · 发表于 2009-2-12 18:14

无私不敢当, 提供解决方案的mineshine老师和回答疑难的朋友才是无私。

请看附页，希望能够可以帮到你。

wtb815 · 发表于 2009-2-12 18:22

谢谢canciaw朋友提供的帮助！也谢谢mineshine老师和关注并帮助本主题的朋友，我来试试看。

zlwlm · 发表于 2009-2-13 10:07

感谢感谢，目前正在做这个任务。

z-xw · 发表于 2009-2-13 10:47

以前也遇到过这个问题
安全验证的问题，可以用下面这个

ClickYesSetup.rar (68.65 KB, 下载次数: 387)
不过只能用于outlook2003及以下版本
outlook2007无效

canciaw · 发表于 2009-2-13 10:57

你好,z-xw,谢谢你的程序，太有用了，我还在写那段绕开安全提示的代码，有你这个ClickYes,省了。衷心谢谢！！！！

z-xw · 发表于 2009-2-13 11:35

我还是建议您继续努力写那个代码吧，现在我每次都还要用别人的电脑（因为他装的是Office2003，我是2007，无效）发东西，写了代码说不定2007就能用了

canciaw · 发表于 2009-2-13 11:57

2007不用这个代码了,在outlook 2007可以有安全中心设置去除安全提示的。

企业有exchange服务器也可以叫管理员弄这个。。。

z-xw · 发表于 2009-2-13 12:14

我晕啊，我谢你楼主啊
我只知道2007不能用
自己重来没有试验过
我刚才试了一把发现
完全不用
哇哈哈哈

lyj1512 · 发表于 2009-2-13 12:36

For i = 2 To Sheets("CFD").[A65536].End(xlUp).Row

Means form row 2 to end row, 获得最后一行的行号

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

[求助] Excel自动发送邮件（按条件发送）