OUTLOOK VBA 收到新邮件后自动保存包含特定字符的附件到指定文件夹

订阅了不少邮件列表，管理起来很麻烦，你可以利用邮件规则让Outlook　express将不同的邮件列表分门别类存放到不同的文件夹中。下面以“电脑爱好者网络版”为例进行介绍。首先在Outlook　express左侧的“文件夹”窗格中右击“收件箱”并新建一个名为“电脑爱好者网络期刊”的文件夹；打开“邮件规则”设置窗口22单击“新建”按钮，选择“选择规则条件”中勾选“若‘主题’行中包含特定的词”（“电脑爱好者网络版”邮件列表的主题行前几字都是“电脑爱好者网络版”）；接着在“选择规则操作”中勾选　“移动到指定的文件夹”ycg在“规则说明”中单击“包含特定的词”这一超级链接在“键入特定文字”对话框中输入“电脑爱好者网络版”，点“添加→确定”再点击“移动到指定的文件夹”中的蓝色字“指定的”，选择事先建立好的“电脑爱好者网络期刊”文件夹。

vbaoutlook邮件保存选项没有pdf

可能是office版本过低，且没有安装另存为pdf的加载项。如果电脑安装的是微软Office2007及以下版本，那么必须安装另存为pdf的加载项。

方法1：将Outlook电子邮件转换为PDF文件

万兴PDF还为您提供了另一种使用打印功能将Outlook电子邮件转换为PDF文件的方法。下面是简单的步骤。

步骤1.打开Outlook电子邮件

首先打开要打印为PDF文件的Outlook电子邮件，然后单击“文件”“打印”按钮。

步骤2.将Outlook电子邮件打印为PDF文件

在“打印”对话框中，请选择“万兴PDF”作为打印机。打印的PDF文件将自动在万兴PDF中打开。

步骤3.将Outlook邮件另存为PDF文件

在万兴PDF中，您可以转到“文件”“保存”按钮，将打印的PDF文档保存到计算机上。

方法2：使用Adobe Acrobat将Outlook另存为PDF文件

您可以通过两种不同的方式在Windows 10中更改默认的PDF查看器_使用文件浏览器或通过控制面板。如果您遵循以下简单步骤，两种操作都很容易做到：

步骤1.安装Adobe Acrobat

与Microsoft Office一样，如果在安装Microsoft Outlook之后安装Adobe Acrobat，则对Adobe Acrobat的快速访问将自动插入到Outlook中。启动Outlook，然后单击工具栏上的Adobe Acrobat。然后，您将看到两个选项：添加Adobe PDF和添加受保护的Adobe PDF。添加Adobe PDF意味着将每个附件（如PowerPoint，Word，文本等）保存为PDF。

添加受保护的Adobe PDF意味着您将文档和附件另存为受保护的PDF，这意味着该文件在打开，复制或打印时受保护。

步骤2.将Outlook电子邮件另存为PDF文件

启动Outlook，然后单击工具栏上的Adobe Acrobat。在子菜单上，您可以看到四个选项卡：“选定的邮件”，“选定的文件夹”，“更改转换设置”和“设置自动存档”。在这里，您可以使用两个选项将Outlook电子邮件转换为PDF文件。

将选定的邮件转换为PDF：在“选定的邮件”下，选择“创建新PDF”或“附加到现有PDF”。选择您需要另存为PDF的电子邮件，然后右键单击它。导航到“转换为Adobe PDF”，命名您的PDF文件，然后单击“保存”。_dobe Acrobat将立即将您的电子邮件和附件另存为PDF文件。

将选定的邮件文件夹转换为PDF：为了节省时间，您可以将所有要转换为PDF的电子邮件保存在一个文件夹中。然后在工具栏上单击“选定的文件夹”，然后选择正确的文件夹以开始将Outlook邮件保存为PDF文件。

将Outlook电子邮件保存为PDF文件后，它们将在Adobe Acrobat中打开。只需单击它们即可查看邮件的所有内容。您也可以单击附件中的超链接在另一个窗口中将其打开。

如何用excel vba编写的程序群发邮件，邮件包括多个附件。哪位高手能指教一下

Excel不是编程语言，内嵌的VBA有编程功能，可以扩展Excel的应用。Excel也确实内嵌了邮件收发的功能，但添加的附件一般都是当前工作表或工作簿。

SendMail 方法

使用已安装的邮件系统发送工作簿。

expression.SendMail(Recipients, Subject, ReturnReceipt)

expression 必需。该表达式返回一个 Workbook 对象。

Recipients Variant 类型，必需。以文本形式指定收件人的名称，如果有多个收件人，则使用文本字符串数组。必须至少指定一个收件人，而且所有收件人名单都添加到“收件人”中。

Subject Variant 类型，可选。指定消息的主题。如果省略该参数，则使用文档名称。

ReturnReceipt Variant 类型，可选。如果该值为 True，则要求返回回执；如果该值为 False，则不要求返回回执。默认值为 False。

示例

本示例将当前活动工作簿传送给一个收件人。

ActiveWorkbook.SendMail recipients:="Jean Selva"

用VBA在outlook邮箱发送会议邀请的时候，能自动把指定ppt里面的内容复制到会议的正文里，如何实现？

理论讲应该是可以的，因为PPT也有自己的VBA，实际做的时候，估计相当难，，，PPT的宏，我就没见过相关的教程

下面是两个PPT代码，或许你可以参考下

遍历活动幻灯片的所有文本框

文本框是PowerPoint演示文稿中最常用的形状。你可以通过添加一个 "形状类型 "的复选框，在所有的文本框中循环使用。文本框的形状类型定义为VBA常数msoTextBox（常数值为17）。

Dim currentSlide as Slide

Dim shp as Shape

Set currentSlide = Application.ActiveWindow.View.Slide

For Each shp In currentSlide.Shapes

' Check if the shape type is msoTextBox

If shp.Type = 17 Then ' msoTextBox = 17

'Print the text in the TextBox

Debug.Print shp.TextFrame2.TextRange.Text

End If

Next shp

遍历所有幻灯片中的所有文本框

同样，你可以通过添加一个循环来遍历所有的幻灯片。

1Dim currentSlide as Slide Dim shp as Shape

For Each currentSlide In ActivePresentation.Slides

For Each shp In currentSlide.Shapes

' Check if the shape type is msoTextBox

If shp.Type = 17 Then ' msoTextBox = 17

' Do something with the TextBox referred to in variable 'shp'

Debug.Print shp.TextFrame2.TextRange.Text

End If

Next shp

Next currentSlide