如何将excel文件转换成pdf文件？

一、首先，打开Excel表格程序，在Excel表格程序界面上方选择“文件”，然后点击“另存为”，点击打开。

二、然后，在窗口中选择“保存类型”设置为“PDF格式”。

三、最后，在对话框中点击下方的“保存”，点击选中即可将Excel表格转换为“PDF”格式，问题解决。

首先，加载引用，如图

然后，在打印机中对Acrobat Distiller的打印进行设置设置（必须，否则转化出错！）

Public Sub MakePDF(ByVal strPDFFileName As String)

Dim strPSFileName As String

Dim xlWorksheet As Worksheet

Dim objPdfDistiller As PdfDistiller

strPSFileName = Left(strPDFFileName, InStrRev(strPDFFileName, "/")) &"tmpPostScript.ps"

Set xlWorksheet = ActiveSheet

Call xlWorksheet.PrintOut(copies:=1, preview:=False, ActivePrinter:="Acrobat Distiller", printtofile:=True, collate:=True, prtofilename:=strPSFileName)

Set objPdfDistiller = New PdfDistiller

Call objPdfDistiller.FileToPDF(strPSFileName, strPDFFileName, "")

Call Kill(strPSFileName)

End Sub