(已解决)用excel VBA发邮件，邮件内容中的超链接

tyxvba7529 · 发表于 2014-9-3 15:38

本帖最后由 tyxvba7529 于 2014-9-5 11:11 编辑

以下是邮件内容，蓝色部分，怎么让他自动成超链接啊？是HTML 语言来的，不会弄；
还有这种HTML语言是不是只能在模块中用啊，我在excel对象下怎么不行呢？
行家请帮忙看看~~~

body = " Dear " & " 工程师 , " & _
" 请确认附件的ECO是否需要PPAP，请在一个工作日内确认，谢谢！！！ " & _
"如需要PPAP请给出需要PPAP的物料号 " & _
"ECO图纸路径: " & _
"\\Tkecmsienserver\en-file\Others\work\图纸、技术文件放发\登记及转成后的PDF\EC\已放报价图里的 " & _
"Best regards， " & _
"Cindy Tang " & _
"Contract Engineering Department " & _
"Thyssen Elevators Co., Ltd. "

422904z · 发表于 2014-9-3 15:59

这样就ok
<a href="\\Tkecmsienserver\en-file\Others\work\图纸、技术文件放发\登记及转成后的PDF\EC\已放报价图里的"> 要显示的文字</a>

tyxvba7529 · 发表于 2014-9-3 16:10

422904z 发表于 2014-9-3 15:59
这样就ok
要显示的文字

不行呢，显示语法错误

422904z · 发表于 2014-9-3 21:48

我的可以啊

.HTMLBody = "a href=""http:\\www.baidu.com"">http:\\www.baidu.com</a> "

mineshine · 发表于 2014-9-4 10:16

问题一：
body = " Dear " & " 工程师 , " & _
" 请确认附件的ECO是否需要PPAP，请在一个工作日内确认，谢谢！！！ " & _
"如需要PPAP请给出需要PPAP的物料号 " & _
"ECO图纸路径: " & _
"<a href=" & Chr(34) & "\\Tkecmsienserver\en-file\Others\work\图纸、技术文件放发\登记及转成后的PDF\EC\已放报价图里的" & Chr(34) & _
">\\Tkecmsienserver\en-file\Others\work\图纸、技术文件放发\登记及转成后的PDF\EC\已放报价图里的</a> " & _
"Best regards， " & _
"Cindy Tang " & _
"Contract Engineering Department " & _
"Thyssen Elevators Co., Ltd. "

问题二：
HTML在VBA中包在字符串里，所以也可以用在ActiveX控件事件中。

tyxvba7529 · 发表于 2014-9-4 11:08

422904z 发表于 2014-9-3 21:48
我的可以啊

.HTMLBody = "a href=""http:\\www.baidu.com"">http:\\www.baidu.com"

多了双引号，谢谢你，原来要这样：
"<a href=\\Tkecmsienserver\en-file\Others\work\图纸、技术文件放发\登记及转成后的PDF\EC\已放报价图里的>要显示的文字</a> "

tyxvba7529 · 发表于 2014-9-4 11:16

mineshine 发表于 2014-9-4 10:16
问题一：
body = " Dear " & " 工程师 , " & _
" 请确认附件的ECO是否需要PPAP，请在一个工作日内确认， ...

大侠，谢谢你；
第一点，你一定是帮我想了很久，才想到这个办法了，真的是非常感谢；难道char(10)的意思是消除双引号？？？
刚发现不要用双引号就可以。
"<a href=\\Tkecmsienserver\en-file\Others\work\图纸、技术文件放发\登记及转成后的PDF\EC\已放报价图里的>ECO图纸路径</a> "

第二点，我看不懂，说得太专业了，囧囧......

mineshine · 发表于 2014-9-4 11:29

本帖最后由 mineshine 于 2014-9-4 14:28 编辑

tyxvba7529 发表于 2014-9-4 11:16
大侠，谢谢你；
第一点，你一定是帮我想了很久，才想到这个办法了，真的是非常感谢；难道char(10)的 ...

第一点：
你可以查幇助ASCII
Chr(34)代表双引号"

我的EXCEL2003测要用双引号才不会产生错误讯息
避免在不同版本的Excel 执行出错
建议还是依HTML语法使用双引号

第二点：
使用控件箱工具，例如CommandButton，代码可以含有HTML。

tyxvba7529 · 发表于 2014-9-4 11:54

mineshine 发表于 2014-9-4 11:29
第一点：
你可以查幇助ASCII
Chr(34)代表双引号"

原来这样啊，又跟着你学到新东西了，谢谢你~

mingming58 · 发表于 2021-6-29 09:26

原来这样啊，又跟着你学到新东西了，谢谢你~

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

[求助] (已解决)用excel VBA发邮件，邮件内容中的超链接

评分

评分

[求助] (已解决)用excel VBA发邮件， 邮件内容中的 超链接

评分

评分

[求助] (已解决)用excel VBA发邮件，邮件内容中的超链接