如何将Excel或Word文件转换为pdf文件，合并并通过Excel中的vba邮寄

Question

我不是VBA宏或编码方面的专家，请帮助我为自己的标题创建一些宏。我仅尝试从此站点进行一些编码，但失败了。请让我知道如何将该文件附加到此消息中。

Answer 1

在VBA中创建pdf非常简单，但我认为您不能将pdf与VBA合并，而应使用具有合并功能的PDF阅读器/编辑器。

方法是使用VBA将单词内容导入到excel中，反之亦然，然后进行一次pdf导出。

要从excel导出为pdf：

Sub Print_PDF()
Dim Filename, Path As String


Filename= "Your file name"

Path= "Folder Path, remember to end with \  " 

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
    Path & Filename & ".pdf" _
    , Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
    :=False, OpenAfterPublish:=True

End Sub

注意：这只会在Excel中打印活动工作表，以打印更多您必须选择多张图纸（手动或在VBA中）在运行子程序之前。