用vba把excel文件发布转化为pdf格式文件

Posted aliensky

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了用vba把excel文件发布转化为pdf格式文件相关的知识,希望对你有一定的参考价值。

 

将工作薄每一个工作表导出为PDF文件。

 

Sub aliensky()
 Dim asy As Worksheet
 Dim spath As String
 spath = Excel.ThisWorkbook.Path
 For Each asy In Excel.ThisWorkbook.Worksheets
 sName = spath & "" & asy.Name & ".pdf"
 asy.ExportAsFixedFormat Type:=xlTypePDF, Filename:=sName
 Next
End Sub

将当前工作表导出为PDF文件。

 

Sub aliensky1()
spatch = Excel.ThisWorkbook.Path
sName = spatch & "" & ActiveWorkbook.Name & ".pdf"
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:=sName
End Sub

 VBA 参考文档

https://msdn.microsoft.com/zh-cn/VBA/Excel-VBA/articles/workbook-exportasfixedformat-method-excel

以上是关于用vba把excel文件发布转化为pdf格式文件的主要内容,如果未能解决你的问题,请参考以下文章

怎么把pdf转化成Excel格式?

怎么把坐标信息的Excel文件转换为KML文件

怎么把excel和word结合在一起转化为PDF WordExcel转换PDF

如何把pdf文件转换为excel表格

如何将HTML文件转化成excel的文件,

在线pdf怎样转换为excel文件