VBA 实现EXCEl的sheet转换成PDF

  1. 首先,打开Excel,然后按下 Alt + F11 打开VBA编辑器。
  2. 在VBA编辑器中,点击 插入 -> 模块,创建一个新的模块。
  3. 在新模块中,复制并粘贴以下VBA代码:
vbscript 复制代码
Sub ExportEachSheetToPDF()
    Dim ws As Worksheet
    Dim pdfFolder As String
    Dim pdfName As String
    
    ' 设置PDF保存的文件夹路径
    pdfFolder = "C:\Your\Desired\Folder\"
    
    Application.ScreenUpdating = False ' 关闭屏幕更新以加快宏的执行速度
    Application.DisplayAlerts = False ' 禁用弹窗提示
    
    For Each ws In ThisWorkbook.Worksheets
        pdfName = Replace(ws.Name, " ", "_") ' 替换工作表名称中的空格
        ws.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfFolder & pdfName & ".pdf", _
            Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
           OpenAfterPublish:=False
    Next ws
    
    Application.ScreenUpdating = True ' 恢复屏幕更新
    Application.DisplayAlerts = True ' 恢复弹窗提示
    
    MsgBox "所有工作表已导出为PDF文件。"
End Sub
  1. 修改 pdfFolder变量的值,设置你希望保存PDF文件的路径。
  2. 运行这个宏。你可以在VBA编辑器中按 F5 键,或者在Excel中通过快捷键 Alt + F8,然后选择 ConvertToPDF 并运行。

请注意,这个脚本会将每个工作表导出为一个单独的PDF文件,并且文件名将基于工作表的名称。确保你有权限写入指定的路径,并且Excel具有将文件导出为PDF的功能(这通常需要安装Adobe Acrobat或者使用Excel的内置PDF导出功能)。

相关推荐
核桃杏仁粉1 小时前
excel拼接数据库
数据库·oracle·excel
cx330上的猫1 小时前
价值1w的数据分析课知识点汇总-excel使用(第一篇)
数据挖掘·数据分析·excel
CodeCraft Studio4 小时前
国产化PDF处理控件Spire.PDF教程:如何在 C# 中从 HTML 和 PDF 模板生成 PDF
pdf·c#·html·.net·spire.pdf·pdf文档开发·html创建模板pdf
小薛引路5 小时前
office便捷办公06:根据相似度去掉excel中的重复行
windows·python·excel
CodeLongBear8 小时前
苍穹外卖 Day12 实战总结:Apache POI 实现 Excel 报表导出全流程解析
java·excel
E_ICEBLUE10 小时前
高效压缩 PDF 文件大小(3 大实用的 Python 库)
python·pdf
技术钱18 小时前
vue3 封装图片上传预览组件支持docx、excel、pdf、图片、txt格式
vue.js·pdf·excel
xingxing_F19 小时前
PDF Protector for mac PDF文档加密解密工具
macos·pdf
r i c k19 小时前
Excel表----VLOOKUP函数实现两表的姓名、身份证号码、银行卡号核对
excel
985小水博一枚呀21 小时前
【AI大模型学习路线】第三阶段之RAG与LangChain——第十九章(实战基于Advanced RAG的PDF问答)系统部署与测试?
人工智能·学习·langchain·pdf