将Excel工作簿转换为PDF,可以使用“另存为”,也可以使用打印至虚拟PDF打印机。
将Excel工作表转换为PDF,可以使用打印至虚拟PDF打印机。
如何将单元格区域导出为PDF呢?设置打印区域,打印至虚拟PDF打印机,同样可以实现。但是这个方法太绕了,可以使用更简单的方法。
也许读者知道ExportAsFixedFormat可以将工作簿转换为PDF,殊不知Range对象也有ExportAsFixedFormat方法。
示例代码如下。
Sub Demo()
file_pdf = ThisWorkbook.Path & "\data.pdf"
Range("A1:G14").ExportAsFixedFormat xlTypePDF, file_pdf
End Sub
【代码解析】
第2行代码指定PDF文件全路径。
第3行代码使用ExportAsFixedFormat方法,将A1:F30单元格区域导出为PDF文件。第一个参数指定文件格式为PDF,第二个参数指定PDF文件。
单元格区域导出为PDF就是这么简单!