由于平时工作内容需要邮件发送,发送之前先使用excel编辑好,然后发送,这样发送邮件比较耗时,因此在网上找了相应代码,学习后进行简单改变,将Excel表的最后一行用邮件发送。

前提是要安装并登录outlook账号,使用的Microsoft Office,WPS没有试成功。另外文档格式需要修改为“.xlsm”且需要启用宏。

Excel的内容

代码如下:

Sub Mail()Dim Mail As Outlook.ApplicationSet Mail = New Outlook.ApplicationDim objMail As Outlook.MailItemSet objMail = Mail.CreateItem(olMailItem)Dim lastLine As String '定义变量lastLine = ActiveSheet.Range("A" & Rows.Count).End(xlUp).Row '最后一行With objMail.Subject = Sheet1.Cells(lastLine, 1)  '主题.To = Sheet1.Cells(lastLine, 3)  '收件人.BodyFormat = olFormatHTML.HTMLBody = Sheet1.Cells(lastLine, 2) '正文 .Attachments.Add "D:\RunLog.txt"     '附件.Send '执行发送End WithEnd Sub

Excel vba 调用outlook发送邮件相关推荐

  1. Excel VBA开发自动发送邮件

    一..设置Outlook邮箱帐(略不是本文章的重点) 二..设置Outlook信任中心如下步骤 若没有做如下操作设置,则Excel VBA调用Outlook自动发送邮件时提示如下 2.1 Outloo ...

  2. vba 添加outlook 签名_调用Outlook发送邮件-附带签名

    时 间:2018-10-25 13:06:22 作 者:摘 要:怎么样在调用Outlook的时候附带上签名呢? 正 文: 由于签名一般都有特殊格式,所以在access中直接加入文本签名是不可行的,那么 ...

  3. Python 调用 Outlook 发送邮件

    微软 Office 提供基于 COM 接口的编程.Python 通过 pywin32 可以方便地调用各组件.如果下载和安装 pywin32 有困难,可以到 Sourceforge 的镜像网摘查找合适的 ...

  4. excel vba 调用webbrowser_Python杀死Excel?我只会用Python来增强Excel!

    Excel既是一种祝福,也是一种诅咒.当涉及到足够小的数据和足够简单的操作时,Excel是王者.然而,一旦你发现数据非常多时,它就会变成一种痛苦.当然,你可以使用Excel VBA来解决这些问题,但是 ...

  5. excel vba 调用webbrowser_VBA 公式与函数

    一, 在单元格中输入公式的3种方法: 1) 用VBA在单元格中输入普通公式 Sub formula_1() Range("d2") = ("=B2 * C2") ...

  6. excel vba 调用java_excel中vba调用java程序并获取返回值

    在工作中,为提高excel处理效率会写一些vba宏,有时还需要调用外部java程序(比如访问webservice接口的java程序),下面的事例可做参考 一.编写简单的java调试程序 public ...

  7. C# 调用outlook发送邮件

    1.环境准备:右击项目中的引用,选择[管理NuGet程序包] 2.搜索outlook,点击安装(我已经安装过了所以显示的是更新) 3. /// <summary>/// 发送邮件/// & ...

  8. python用outlook自动发邮件_Python 调用outlook发送邮件(转 )

    单账号: import win32com.client as win32 def send_mail(): outlook = win32.Dispatch('Outlook.Application' ...

  9. cdo 发送html,vba调用cdo发送邮件(qq邮箱)

    本帖最后由 ndt3 于 2019-11-21 21:25 编辑 ThisWorkbook.ChangeFileAccess Mode:=xlReadOnly '将工作簿设置为只读模式 ThisWor ...

  10. Python调用outlook发送邮件,发送给多人、抄送给多人并带上附件

    我的报告目录 具体解释在代码中有详细注释 import win32com.client as win32 import datetime, osaddressee = 'test01@qq.com'+ ...

最新文章

  1. C语言内存泄露很严重该怎么办?这几招告诉你
  2. 使用netsh.exe命令配置TCP/IP
  3. S/4HANA extension field search的SQL语句是在什么地方生成的
  4. Hazelcast入门指南第4部分
  5. MySQL表/视图/存储过程and函数/触发器/事件与数据库之间的关系
  6. java不重复的随机数_Javascript获取不重复的随机数值
  7. unsatisfied condition: __STDC_VERSION__ = 201112L
  8. 什么是Word2Vec?如何有效的表征文本的?
  9. 计算机键盘win键,win10键盘win键失灵怎么办_电脑win10win键没反应的解决方法
  10. Unable to modify the parent container element before the child element is closed
  11. 联通计算机用户名和密码,终极:联通路由器的默认登录密码是什么?
  12. 微型计算机原理DL,微机原理试题
  13. 计算机科学 院士 高校,快报!第5轮学科评估计算机科学与技术评委会名单,看有谁上榜了...
  14. MoveIt教程[11]:Visualizing Collisions
  15. Roson的Qt之旅#71 Qt绘制星空和旋转的星球
  16. Laplacian eigenmap 拉普拉斯特征映射
  17. staruml 免费版
  18. 币市强震,来点理性的心理按摩
  19. 如何设计一个比较通用的爬虫系统
  20. SELinux的设置及应用举例

热门文章

  1. opencv 切取红色
  2. hihocoder #1328 : 逃离迷宫
  3. modbus软件开发linux,Linux C开发之用modbus实现串口通讯
  4. Edge浏览器运行卡顿怎么办 怎样让Edge浏览器速度更快
  5. 西藏自治区林芝市谷歌高清卫星地图下载(百度网盘离线包下载)
  6. 如果制作一个好看的Vlog视频,摄影剪辑声音博主推荐
  7. 领导力【管理学之五】
  8. vue随笔之二类型判断一
  9. 质量功能展开QFD成功案例解析
  10. MPB:南土所褚海燕组-土壤宏转录组学样本前处理与数据分析