将 Excel 工作表作为 Outlook 电子邮件发送的 2 种快速方法

2024-07-12 03:15| 来源: 网络整理| 查看: 265

如果您想将 Excel 工作表作为电子邮件发送，而不是将其作为附件添加到电子邮件中，您可以使用本文介绍的两种方法。

有时，与将 Excel 文件作为附件附加到电子邮件中不同，您可能希望直接在电子邮件正文中插入 Excel 工作表，换句话说，将其作为电子邮件发送。针对这一需求，您可以采用以下两种方式中的一种，具体取决于您是使用 MS Excel 还是 MS Outlook 发送。现在继续阅读以获取详细操作。

将 Excel 工作表作为 Outlook 电子邮件发送

方法一：用Excel发送首先，打开源 Excel 文件。然后单击快速访问工具栏中的向下箭头。从下拉列表中，您应该选择“更多命令”。自定义快速访问工具栏

接下来，您应该将“发送到邮件收件人”添加到快速访问工具栏。首先，在“Choose commands from:”下拉列表中选择“All Commands”。然后，找到并选择“发送到邮件收件人”命令。接下来单击中间的“添加”按钮。将其添加到右侧后，单击“确定”以保存更改。添加“发送到邮件收件人”命令

之后，返回 Excel 主窗口并单击快速访问工具栏中的“发送到邮件收件人”按钮。在弹出的对话框中，选择“将当前工作表作为消息正文发送”。发送当前工作表作为邮件正文

稍后将显示一个新的工具栏，如下面的屏幕截图。现在您可以根据需要编写电子邮件详细信息。撰写电子邮件详细信息

最后，单击“发送此表”按钮以将此表作为电子邮件发送出去。方法二：在 Outlook 中发送首先，启动您的 Outlook 程序。然后按“Alt + F11”键按钮打开 Outlook VBA 编辑器。随后，打开一个新模块并将以下 VBA 代码复制到其中。 Sub SendanExcelWorksheetAsEmail() Dim strExcelFile As String Dim objExcelApp As Excel.Application Dim objExcelWorkBook As Excel.Workbook Dim objExcelWorkSheet As Excel.Worksheet Dim objMail As Outlook.MailItem strExcelFile = InputBox("在此处复制具体excel文件的文件路径：", "Specify Excel file", "E:\Contacts.xlsx") 错误继续下一步 Set objExcelApp = CreateObject("Excel.Application") ") '更改为您自己想要的电子邮件正文 objExcelWorkSheet.MailEnvelope.Introduction = "Message Body" Set objMail = objExcelWorkSheet.MailEnvelope.Item With objMail '根据需要更改收件人和主题 .To = "[email protected]" .Subject = objExcelWorkSheet.Name '使用.Send直接发送出去.Save End With objExcelApp.Quit End Sub

VBA 代码 - 将 Excel 工作表作为 Outlook 电子邮件发送

之后，您可以单击工具栏中的“运行”图标。立刻，宏将被触发。然后，您需要将特定 Excel 文件的文件路径复制到输入框中，然后点击“确定”。指定 Excel 文件

最后，将在“草稿”邮件文件夹中保存一封包含正文中的 Excel 工作表的新电子邮件。你可以像下面的截图一样找到它：将 Excel 工作表作为 Outlook 电子邮件发送

巧妙应对棘手的 PST 问题

由于 Outlook PST 文件容易出错，您可能在 Outlook 中遇到过各种问题。因此，为了避免痛苦 PST损坏, 为您的 PST 文件进行定期数据备份是明智的。此外，您必须在附近放置一个强大的修复工具，例如 DataNumen Outlook Repair.

作者简介：

Shirley Zhang 是一位数据恢复专家 DataNumen, Inc.，它是数据恢复技术领域的世界领先者，包括 sql损坏和 outlook 修复软件产品。欲了解更多信息，请访问 datanumen

【本文地址】

公司简介

联系我们